home *** CD-ROM | disk | FTP | other *** search
/ MacFormat España 17 / MacFormat 17 (Spain) / MacFormat 17.bin / DATABASE / SHARED.DIR < prev   
Macromedia Director  |  1996-03-14  |  1.7 MB
open in: MacOS 8.1     |     Win98     |     DOS

view JSON data     |     view as text

This file was processed as: Macromedia Director (archive/macromediaDirector).

You can browse this item here: SHARED.DIR

ConfidenceProgramDetectionMatch TypeSupport
100% dexvert Macromedia Director (archive/macromediaDirector) magic Supported
1% dexvert PC-Talk III data (other/pcTalkIIIData) ext Unsupported
1% dexvert Central Point PC Backup Directory data (other/centralPointPCBackupDirectoryData) ext Unsupported
1% dexvert RIFF (Generic Fallback) (archive/riff) fallback Supported
100% file RIFF (big-endian) data default
99% file data default
44% TrID Macromedia Director project (Big-endian) default
22% TrID Adobe Director Protected Cast (MV93) default
22% TrID Generic RIFX container (big-endian) default
11% TrID Philips Respironics M-Series data format default (weak)


hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 52 49 46 58 00 17 b4 8c | 4d 56 39 33 69 6d 61 70 |RIFX....|MV93imap|
|00000010| 00 00 00 18 00 00 00 01 | 00 16 4d 94 00 00 00 00 |........|..M.....|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 4b 45 59 2a |........|....KEY*|
|00000030| 00 00 17 b8 00 0c 00 0c | 00 00 01 f9 00 00 01 cd |........|........|
|00000040| 00 00 00 07 00 00 00 0c | 53 54 58 54 00 00 00 0e |........|STXT....|
|00000050| 00 00 00 10 53 54 58 54 | 00 00 00 0d 00 00 00 11 |....STXT|........|
|00000060| 53 54 58 54 00 00 00 92 | 00 00 00 1c 53 54 58 54 |STXT....|....STXT|
|00000070| 00 00 00 49 00 00 00 20 | 53 54 58 54 00 00 00 60 |...I... |STXT...`|
|00000080| 00 00 00 21 53 54 58 54 | 00 00 00 23 00 00 00 22 |...!STXT|...#..."|
|00000090| 53 54 58 54 00 00 00 15 | 00 00 00 26 53 54 58 54 |STXT....|...&STXT|
|000000a0| 00 00 00 29 00 00 00 28 | 53 54 58 54 00 00 00 3c |...)...(|STXT...<|
|000000b0| 00 00 00 2a 53 54 58 54 | 00 00 03 ad 00 00 00 32 |...*STXT|.......2|
|000000c0| 53 54 58 54 00 00 00 4f | 00 00 00 33 53 54 58 54 |STXT...O|...3STXT|
|000000d0| 00 00 05 f9 00 00 00 34 | 53 54 58 54 00 00 00 2c |.......4|STXT...,|
|000000e0| 00 00 00 36 42 49 54 44 | 00 00 03 30 00 00 00 37 |...6BITD|...0...7|
|000000f0| 53 54 58 54 00 00 03 fd | 00 00 00 38 53 54 58 54 |STXT....|...8STXT|
|00000100| 00 00 00 59 00 00 00 3a | 73 6e 64 20 00 00 00 3b |...Y...:|snd ...;|
|00000110| 00 00 00 40 53 54 58 54 | 00 00 03 93 00 00 00 42 |...@STXT|.......B|
|00000120| 53 54 58 54 00 00 00 cc | 00 00 00 46 53 54 58 54 |STXT....|...FSTXT|
|00000130| 00 00 00 3f 00 00 00 47 | 42 49 54 44 00 00 00 14 |...?...G|BITD....|
|00000140| 00 00 00 4a 53 54 58 54 | 00 00 00 57 00 00 00 4d |...JSTXT|...W...M|
|00000150| 53 54 58 54 00 00 00 5a | 00 00 00 53 42 49 54 44 |STXT...Z|...SBITD|
|00000160| 00 00 00 61 00 00 00 54 | 53 54 58 54 00 00 00 fa |...a...T|STXT....|
|00000170| 00 00 00 5b 53 54 58 54 | 00 00 03 76 00 00 00 5c |...[STXT|...v...\|
|00000180| 53 54 58 54 00 00 01 89 | 00 00 00 5d 53 54 58 54 |STXT....|...]STXT|
|00000190| 00 00 00 5e 00 00 00 65 | 53 54 58 54 00 00 00 2f |...^...e|STXT.../|
|000001a0| 00 00 00 68 4d 6f 6f 56 | 00 00 00 41 00 00 00 69 |...hMooV|...A...i|
|000001b0| 73 6e 64 20 00 00 00 5f | 00 00 00 6b 53 54 58 54 |snd ..._|...kSTXT|
|000001c0| 00 00 00 6a 00 00 00 6d | 53 54 58 54 00 00 00 1f |...j...m|STXT....|
|000001d0| 00 00 00 6f 53 54 58 54 | 00 00 01 b7 00 00 00 71 |...oSTXT|.......q|
|000001e0| 53 54 58 54 00 00 00 77 | 00 00 00 73 53 54 58 54 |STXT...w|...sSTXT|
|000001f0| 00 00 05 03 00 00 00 7a | 42 49 54 44 00 00 00 99 |.......z|BITD....|
|00000200| 00 00 00 7c 53 54 58 54 | 00 00 00 7e 00 00 00 7d |...|STXT|...~...}|
|00000210| 53 54 58 54 00 00 00 75 | 00 00 00 80 53 54 58 54 |STXT...u|....STXT|
|00000220| 00 00 01 74 00 00 00 81 | 53 54 58 54 00 00 00 a0 |...t....|STXT....|
|00000230| 00 00 00 84 53 54 58 54 | 00 00 00 a1 00 00 00 85 |....STXT|........|
|00000240| 53 54 58 54 00 00 03 46 | 00 00 00 86 53 54 58 54 |STXT...F|....STXT|
|00000250| 00 00 02 00 00 00 00 88 | 53 54 58 54 00 00 00 8b |........|STXT....|
|00000260| 00 00 00 89 53 54 58 54 | 00 00 05 a9 00 00 00 8d |....STXT|........|
|00000270| 53 54 58 54 00 00 00 90 | 00 00 00 8f 53 54 58 54 |STXT....|....STXT|
|00000280| 00 00 03 4f 00 00 00 98 | 53 54 58 54 00 00 00 7f |...O....|STXT....|
|00000290| 00 00 00 9a 53 54 58 54 | 00 00 01 8f 00 00 00 9c |....STXT|........|
|000002a0| 53 54 58 54 00 00 02 cf | 00 00 00 9d 53 54 58 54 |STXT....|....STXT|
|000002b0| 00 00 03 18 00 00 00 9e | 53 54 58 54 00 00 04 78 |........|STXT...x|
|000002c0| 00 00 00 9f 42 49 54 44 | 00 00 03 49 00 00 00 a5 |....BITD|...I....|
|000002d0| 53 54 58 54 00 00 00 a9 | 00 00 00 a6 42 49 54 44 |STXT....|....BITD|
|000002e0| 00 00 05 ee 00 00 00 a7 | 53 54 58 54 00 00 00 8a |........|STXT....|
|000002f0| 00 00 00 aa 53 54 58 54 | 00 00 05 e0 00 00 00 af |....STXT|........|
|00000300| 53 54 58 54 00 00 00 52 | 00 00 00 b1 53 54 58 54 |STXT...R|....STXT|
|00000310| 00 00 00 48 00 00 00 b3 | 53 54 58 54 00 00 00 3d |...H....|STXT...=|
|00000320| 00 00 00 b4 53 54 58 54 | 00 00 00 ae 00 00 00 b5 |....STXT|........|
|00000330| 53 54 58 54 00 00 00 b2 | 00 00 00 b7 53 54 58 54 |STXT....|....STXT|
|00000340| 00 00 00 c0 00 00 00 b8 | 53 54 58 54 00 00 05 15 |........|STXT....|
|00000350| 00 00 00 b9 53 54 58 54 | 00 00 04 32 00 00 00 ba |....STXT|...2....|
|00000360| 53 54 58 54 00 00 00 be | 00 00 00 bc 53 54 58 54 |STXT....|....STXT|
|00000370| 00 00 00 bb 00 00 00 bf | 53 54 58 54 00 00 00 c1 |........|STXT....|
|00000380| 00 00 00 c2 53 54 58 54 | 00 00 00 c3 00 00 00 c4 |....STXT|........|
|00000390| 53 54 58 54 00 00 00 c9 | 00 00 00 c6 53 54 58 54 |STXT....|....STXT|
|000003a0| 00 00 00 c5 00 00 00 c7 | 53 54 58 54 00 00 00 ca |........|STXT....|
|000003b0| 00 00 00 c8 53 54 58 54 | 00 00 00 d0 00 00 00 cb |....STXT|........|
|000003c0| 53 54 58 54 00 00 00 cf | 00 00 00 cd 53 54 58 54 |STXT....|....STXT|
|000003d0| 00 00 03 38 00 00 00 ce | 53 54 58 54 00 00 00 d2 |...8....|STXT....|
|000003e0| 00 00 00 d4 53 54 58 54 | 00 00 00 d1 00 00 00 d6 |....STXT|........|
|000003f0| 53 54 58 54 00 00 03 d0 | 00 00 00 d7 53 54 58 54 |STXT....|....STXT|
|00000400| 00 00 00 dc 00 00 00 d8 | 53 54 58 54 00 00 05 29 |........|STXT...)|
|00000410| 00 00 00 d9 53 54 58 54 | 00 00 00 df 00 00 00 da |....STXT|........|
|00000420| 53 54 58 54 00 00 00 d5 | 00 00 00 db 53 54 58 54 |STXT....|....STXT|
|00000430| 00 00 02 71 00 00 00 e2 | 53 54 58 54 00 00 01 66 |...q....|STXT...f|
|00000440| 00 00 00 e3 53 54 58 54 | 00 00 00 e6 00 00 00 e4 |....STXT|........|
|00000450| 53 54 58 54 00 00 03 35 | 00 00 00 e5 53 54 58 54 |STXT...5|....STXT|
|00000460| 00 00 00 e1 00 00 00 e7 | 53 54 58 54 00 00 00 e9 |........|STXT....|
|00000470| 00 00 00 eb 53 54 58 54 | 00 00 00 43 00 00 00 ec |....STXT|...C....|
|00000480| 53 54 58 54 00 00 00 e8 | 00 00 00 ed 53 54 58 54 |STXT....|....STXT|
|00000490| 00 00 00 ea 00 00 00 ef | 53 54 58 54 00 00 05 a1 |........|STXT....|
|000004a0| 00 00 00 f1 53 54 58 54 | 00 00 00 ee 00 00 00 f3 |....STXT|........|
|000004b0| 53 54 58 54 00 00 00 f0 | 00 00 00 f6 53 54 58 54 |STXT....|....STXT|
|000004c0| 00 00 00 f4 00 00 00 fb | 53 54 58 54 00 00 04 80 |........|STXT....|
|000004d0| 00 00 00 fd 53 54 58 54 | 00 00 00 f5 00 00 01 01 |....STXT|........|
|000004e0| 53 54 58 54 00 00 00 7b | 00 00 01 03 53 54 58 54 |STXT...{|....STXT|
|000004f0| 00 00 00 f7 00 00 01 05 | 53 54 58 54 00 00 00 fc |........|STXT....|
|00000500| 00 00 01 07 53 54 58 54 | 00 00 00 fe 00 00 01 09 |....STXT|........|
|00000510| 53 54 58 54 00 00 01 02 | 00 00 01 0b 53 54 58 54 |STXT....|....STXT|
|00000520| 00 00 01 04 00 00 01 0d | 53 54 58 54 00 00 01 06 |........|STXT....|
|00000530| 00 00 01 0f 53 54 58 54 | 00 00 01 08 00 00 01 11 |....STXT|........|
|00000540| 53 54 58 54 00 00 01 0a | 00 00 01 13 53 54 58 54 |STXT....|....STXT|
|00000550| 00 00 01 0e 00 00 01 14 | 53 54 58 54 00 00 01 0c |........|STXT....|
|00000560| 00 00 01 15 53 54 58 54 | 00 00 01 10 00 00 01 16 |....STXT|........|
|00000570| 53 54 58 54 00 00 01 12 | 00 00 01 18 53 54 58 54 |STXT....|....STXT|
|00000580| 00 00 05 62 00 00 01 1a | 53 54 58 54 00 00 01 17 |...b....|STXT....|
|00000590| 00 00 01 1c 53 54 58 54 | 00 00 05 bf 00 00 01 1e |....STXT|........|
|000005a0| 53 54 58 54 00 00 01 19 | 00 00 01 1f 53 54 58 54 |STXT....|....STXT|
|000005b0| 00 00 01 25 00 00 01 20 | 53 54 58 54 00 00 01 1b |...%... |STXT....|
|000005c0| 00 00 01 21 53 54 58 54 | 00 00 01 29 00 00 01 22 |...!STXT|...)..."|
|000005d0| 53 54 58 54 00 00 01 27 | 00 00 01 23 53 54 58 54 |STXT...'|...#STXT|
|000005e0| 00 00 01 2b 00 00 01 24 | 53 54 58 54 00 00 01 2d |...+...$|STXT...-|
|000005f0| 00 00 01 26 53 54 58 54 | 00 00 01 2f 00 00 01 28 |...&STXT|.../...(|
|00000600| 53 54 58 54 00 00 01 31 | 00 00 01 2a 53 54 58 54 |STXT...1|...*STXT|
|00000610| 00 00 01 33 00 00 01 2c | 53 54 58 54 00 00 01 35 |...3...,|STXT...5|
|00000620| 00 00 01 2e 53 54 58 54 | 00 00 01 37 00 00 01 30 |....STXT|...7...0|
|00000630| 53 54 58 54 00 00 01 39 | 00 00 01 32 53 54 58 54 |STXT...9|...2STXT|
|00000640| 00 00 01 3b 00 00 01 34 | 53 54 58 54 00 00 01 3d |...;...4|STXT...=|
|00000650| 00 00 01 36 53 54 58 54 | 00 00 01 3f 00 00 01 38 |...6STXT|...?...8|
|00000660| 53 54 58 54 00 00 01 41 | 00 00 01 3a 53 54 58 54 |STXT...A|...:STXT|
|00000670| 00 00 01 43 00 00 01 3c | 53 54 58 54 00 00 01 45 |...C...<|STXT...E|
|00000680| 00 00 01 3e 53 54 58 54 | 00 00 01 47 00 00 01 40 |...>STXT|...G...@|
|00000690| 53 54 58 54 00 00 01 49 | 00 00 01 42 53 54 58 54 |STXT...I|...BSTXT|
|000006a0| 00 00 01 4b 00 00 01 44 | 53 54 58 54 00 00 01 4a |...K...D|STXT...J|
|000006b0| 00 00 01 46 53 54 58 54 | 00 00 01 4c 00 00 01 48 |...FSTXT|...L...H|
|000006c0| 53 54 58 54 00 00 01 50 | 00 00 01 4d 53 54 58 54 |STXT...P|...MSTXT|
|000006d0| 00 00 01 52 00 00 01 4f | 53 54 58 54 00 00 01 54 |...R...O|STXT...T|
|000006e0| 00 00 01 51 53 54 58 54 | 00 00 01 56 00 00 01 53 |...QSTXT|...V...S|
|000006f0| 53 54 58 54 00 00 01 58 | 00 00 01 55 53 54 58 54 |STXT...X|...USTXT|
|00000700| 00 00 05 09 00 00 01 59 | 53 54 58 54 00 00 01 57 |.......Y|STXT...W|
|00000710| 00 00 01 5a 53 54 58 54 | 00 00 02 f0 00 00 01 5b |...ZSTXT|.......[|
|00000720| 53 54 58 54 00 00 01 5d | 00 00 01 61 53 54 58 54 |STXT...]|...aSTXT|
|00000730| 00 00 01 64 00 00 01 62 | 53 54 58 54 00 00 01 68 |...d...b|STXT...h|
|00000740| 00 00 01 65 53 54 58 54 | 00 00 01 6a 00 00 01 67 |...eSTXT|...j...g|
|00000750| 53 54 58 54 00 00 01 6c | 00 00 01 69 53 54 58 54 |STXT...l|...iSTXT|
|00000760| 00 00 01 6e 00 00 01 6b | 53 54 58 54 00 00 00 82 |...n...k|STXT....|
|00000770| 00 00 01 6d 53 54 58 54 | 00 00 01 76 00 00 01 70 |...mSTXT|...v...p|
|00000780| 53 54 58 54 00 00 01 1d | 00 00 01 71 53 54 58 54 |STXT....|...qSTXT|
|00000790| 00 00 01 77 00 00 01 72 | 53 54 58 54 00 00 02 c6 |...w...r|STXT....|
|000007a0| 00 00 01 75 53 54 58 54 | 00 00 01 7c 00 00 01 78 |...uSTXT|...|...x|
|000007b0| 53 54 58 54 00 00 04 9e | 00 00 01 7d 53 54 58 54 |STXT....|...}STXT|
|000007c0| 00 00 01 7e 00 00 01 7f | 53 54 58 54 00 00 01 86 |...~....|STXT....|
|000007d0| 00 00 01 80 53 54 58 54 | 00 00 01 7b 00 00 01 81 |....STXT|...{....|
|000007e0| 53 54 58 54 00 00 01 88 | 00 00 01 8b 53 54 58 54 |STXT....|....STXT|
|000007f0| 00 00 01 8c 00 00 01 8d | 53 54 58 54 00 00 01 8e |........|STXT....|
|00000800| 00 00 01 90 53 54 58 54 | 00 00 01 c0 00 00 01 91 |....STXT|........|
|00000810| 53 54 58 54 00 00 01 92 | 00 00 01 93 53 54 58 54 |STXT....|....STXT|
|00000820| 00 00 01 97 00 00 01 95 | 53 54 58 54 00 00 01 98 |........|STXT....|
|00000830| 00 00 01 99 53 54 58 54 | 00 00 01 9a 00 00 01 9b |....STXT|........|
|00000840| 53 54 58 54 00 00 01 9f | 00 00 01 9c 53 54 58 54 |STXT....|....STXT|
|00000850| 00 00 03 05 00 00 01 9d | 53 54 58 54 00 00 04 1f |........|STXT....|
|00000860| 00 00 01 9e 53 54 58 54 | 00 00 01 a0 00 00 01 a1 |....STXT|........|
|00000870| 53 54 58 54 00 00 01 a9 | 00 00 01 a2 53 54 58 54 |STXT....|....STXT|
|00000880| 00 00 04 6d 00 00 01 a3 | 53 54 58 54 00 00 01 a8 |...m....|STXT....|
|00000890| 00 00 01 a4 53 54 58 54 | 00 00 03 39 00 00 01 a5 |....STXT|...9....|
|000008a0| 53 54 58 54 00 00 06 44 | 00 00 01 a6 53 54 58 54 |STXT...D|....STXT|
|000008b0| 00 00 01 aa 00 00 01 a7 | 53 54 58 54 00 00 01 b0 |........|STXT....|
|000008c0| 00 00 01 ac 53 54 58 54 | 00 00 01 b1 00 00 01 ae |....STXT|........|
|000008d0| 53 54 58 54 00 00 01 b3 | 00 00 01 af 53 54 58 54 |STXT....|....STXT|
|000008e0| 00 00 04 a4 00 00 01 b6 | 53 54 58 54 00 00 01 b9 |........|STXT....|
|000008f0| 00 00 01 ba 53 54 58 54 | 00 00 01 bf 00 00 01 bb |....STXT|........|
|00000900| 53 54 58 54 00 00 00 19 | 00 00 01 bc 53 54 58 54 |STXT....|....STXT|
|00000910| 00 00 02 3e 00 00 01 bd | 53 54 58 54 00 00 05 a8 |...>....|STXT....|
|00000920| 00 00 01 be 53 54 58 54 | 00 00 02 98 00 00 01 c3 |....STXT|........|
|00000930| 53 54 58 54 00 00 01 c9 | 00 00 01 c7 53 54 58 54 |STXT....|....STXT|
|00000940| 00 00 02 ef 00 00 01 cf | 42 49 54 44 00 00 04 24 |........|BITD...$|
|00000950| 00 00 01 d1 53 54 58 54 | 00 00 01 96 00 00 01 db |....STXT|........|
|00000960| 53 54 58 54 00 00 05 11 | 00 00 01 eb 53 54 58 54 |STXT....|....STXT|
|00000970| 00 00 02 de 00 00 01 f4 | 53 54 58 54 00 00 01 ed |........|STXT....|
|00000980| 00 00 01 f6 53 54 58 54 | 00 00 04 22 00 00 01 fb |....STXT|..."....|
|00000990| 53 54 58 54 00 00 05 13 | 00 00 02 0f 53 54 58 54 |STXT....|....STXT|
|000009a0| 00 00 01 ea 00 00 02 16 | 53 54 58 54 00 00 04 da |........|STXT....|
|000009b0| 00 00 02 3a 53 54 58 54 | 00 00 02 4f 00 00 02 48 |...:STXT|...O...H|
|000009c0| 53 54 58 54 00 00 01 d9 | 00 00 02 51 53 54 58 54 |STXT....|...QSTXT|
|000009d0| 00 00 02 59 00 00 02 57 | 53 54 58 54 00 00 02 60 |...Y...W|STXT...`|
|000009e0| 00 00 02 64 53 54 58 54 | 00 00 03 d2 00 00 02 74 |...dSTXT|.......t|
|000009f0| 53 54 58 54 00 00 03 b5 | 00 00 02 7e 53 54 58 54 |STXT....|...~STXT|
|00000a00| 00 00 02 a3 00 00 02 87 | 53 54 58 54 00 00 00 4b |........|STXT...K|
|00000a10| 00 00 02 89 53 54 58 54 | 00 00 02 85 00 00 02 8b |....STXT|........|
|00000a20| 53 54 58 54 00 00 02 8d | 00 00 02 91 53 54 58 54 |STXT....|....STXT|
|00000a30| 00 00 02 8a 00 00 02 93 | 53 54 58 54 00 00 02 8c |........|STXT....|
|00000a40| 00 00 02 95 53 54 58 54 | 00 00 02 8e 00 00 02 97 |....STXT|........|
|00000a50| 53 54 58 54 00 00 02 90 | 00 00 02 99 53 54 58 54 |STXT....|....STXT|
|00000a60| 00 00 02 92 00 00 02 9a | 53 54 58 54 00 00 02 94 |........|STXT....|
|00000a70| 00 00 02 9f 53 54 58 54 | 00 00 02 a7 00 00 02 a0 |....STXT|........|
|00000a80| 53 54 58 54 00 00 02 96 | 00 00 02 a1 53 54 58 54 |STXT....|....STXT|
|00000a90| 00 00 03 27 00 00 02 a2 | 53 54 58 54 00 00 05 d2 |...'....|STXT....|
|00000aa0| 00 00 02 a5 53 54 58 54 | 00 00 03 32 00 00 02 a8 |....STXT|...2....|
|00000ab0| 53 54 58 54 00 00 00 dd | 00 00 02 a9 53 54 58 54 |STXT....|....STXT|
|00000ac0| 00 00 02 a4 00 00 02 ab | 53 54 58 54 00 00 02 a6 |........|STXT....|
|00000ad0| 00 00 02 ad 53 54 58 54 | 00 00 00 76 00 00 02 af |....STXT|...v....|
|00000ae0| 53 54 58 54 00 00 04 71 | 00 00 02 b0 53 54 58 54 |STXT...q|....STXT|
|00000af0| 00 00 02 ac 00 00 02 b1 | 53 54 58 54 00 00 02 ae |........|STXT....|
|00000b00| 00 00 02 b3 53 54 58 54 | 00 00 02 9c 00 00 02 b4 |....STXT|........|
|00000b10| 53 54 58 54 00 00 00 3e | 00 00 02 b5 53 54 58 54 |STXT...>|....STXT|
|00000b20| 00 00 02 b8 00 00 02 b6 | 53 54 58 54 00 00 02 b2 |........|STXT....|
|00000b30| 00 00 02 b7 53 54 58 54 | 00 00 03 1c 00 00 02 b9 |....STXT|........|
|00000b40| 53 54 58 54 00 00 04 0e | 00 00 02 ba 53 54 58 54 |STXT....|....STXT|
|00000b50| 00 00 03 f5 00 00 02 bc | 53 54 58 54 00 00 02 70 |........|STXT...p|
|00000b60| 00 00 02 c1 53 54 58 54 | 00 00 03 97 00 00 02 cc |....STXT|........|
|00000b70| 53 54 58 54 00 00 02 d3 | 00 00 02 d2 53 54 58 54 |STXT....|....STXT|
|00000b80| 00 00 02 d5 00 00 02 d4 | 53 54 58 54 00 00 04 ae |........|STXT....|
|00000b90| 00 00 02 d6 53 54 58 54 | 00 00 02 d8 00 00 02 d7 |....STXT|........|
|00000ba0| 53 54 58 54 00 00 00 91 | 00 00 02 dc 53 54 58 54 |STXT....|....STXT|
|00000bb0| 00 00 02 78 00 00 02 e4 | 53 54 58 54 00 00 00 51 |...x....|STXT...Q|
|00000bc0| 00 00 02 e7 42 49 54 44 | 00 00 03 5f 00 00 02 e8 |....BITD|..._....|
|00000bd0| 53 54 58 54 00 00 02 07 | 00 00 02 ec 53 54 58 54 |STXT....|....STXT|
|00000be0| 00 00 04 fa 00 00 02 f2 | 53 54 58 54 00 00 05 45 |........|STXT...E|
|00000bf0| 00 00 02 fa 53 54 58 54 | 00 00 02 72 00 00 03 00 |....STXT|...r....|
|00000c00| 53 54 58 54 00 00 02 39 | 00 00 03 01 53 54 58 54 |STXT...9|....STXT|
|00000c10| 00 00 02 55 00 00 03 08 | 53 54 58 54 00 00 02 6a |...U....|STXT...j|
|00000c20| 00 00 03 0b 53 54 58 54 | 00 00 03 25 00 00 03 0c |....STXT|...%....|
|00000c30| 53 54 58 54 00 00 02 3f | 00 00 03 14 53 54 58 54 |STXT...?|....STXT|
|00000c40| 00 00 00 e0 00 00 03 15 | 53 54 58 54 00 00 00 6e |........|STXT...n|
|00000c50| 00 00 03 16 53 54 58 54 | 00 00 03 82 00 00 03 1d |....STXT|........|
|00000c60| 53 54 58 54 00 00 00 f9 | 00 00 03 1f 53 54 58 54 |STXT....|....STXT|
|00000c70| 00 00 03 1b 00 00 03 20 | 53 54 58 54 00 00 03 17 |....... |STXT....|
|00000c80| 00 00 03 21 53 54 58 54 | 00 00 01 5c 00 00 03 28 |...!STXT|...\...(|
|00000c90| 53 54 58 54 00 00 00 b6 | 00 00 03 29 53 54 58 54 |STXT....|...)STXT|
|00000ca0| 00 00 03 a1 00 00 03 2f | 53 54 58 54 00 00 03 3f |......./|STXT...?|
|00000cb0| 00 00 03 3a 53 54 58 54 | 00 00 03 40 00 00 03 3d |...:STXT|...@...=|
|00000cc0| 42 49 54 44 00 00 03 42 | 00 00 03 41 42 49 54 44 |BITD...B|...ABITD|
|00000cd0| 00 00 04 38 00 00 03 43 | 53 54 58 54 00 00 03 45 |...8...C|STXT...E|
|00000ce0| 00 00 03 44 42 49 54 44 | 00 00 03 48 00 00 03 47 |...DBITD|...H...G|
|00000cf0| 42 49 54 44 00 00 05 cf | 00 00 03 4a 53 54 58 54 |BITD....|...JSTXT|
|00000d00| 00 00 03 07 00 00 03 4c | 53 54 58 54 00 00 03 53 |.......L|STXT...S|
|00000d10| 00 00 03 51 53 54 58 54 | 00 00 00 93 00 00 03 55 |...QSTXT|.......U|
|00000d20| 53 54 58 54 00 00 03 84 | 00 00 03 59 42 49 54 44 |STXT....|...YBITD|
|00000d30| 00 00 04 b0 00 00 03 5b | 53 54 58 54 00 00 03 5a |.......[|STXT...Z|
|00000d40| 00 00 03 5c 42 49 54 44 | 00 00 01 84 00 00 03 63 |...\BITD|.......c|
|00000d50| 53 54 58 54 00 00 03 6f | 00 00 03 65 42 49 54 44 |STXT...o|...eBITD|
|00000d60| 00 00 00 72 00 00 03 66 | 42 49 54 44 00 00 03 68 |...r...f|BITD...h|
|00000d70| 00 00 03 67 42 49 54 44 | 00 00 03 6a 00 00 03 69 |...gBITD|...j...i|
|00000d80| 42 49 54 44 00 00 03 1e | 00 00 03 6c 53 54 58 54 |BITD....|...lSTXT|
|00000d90| 00 00 03 6e 00 00 03 6d | 42 49 54 44 00 00 00 74 |...n...m|BITD...t|
|00000da0| 00 00 03 70 42 49 54 44 | 00 00 04 99 00 00 03 73 |...pBITD|.......s|
|00000db0| 53 54 58 54 00 00 03 75 | 00 00 03 74 42 49 54 44 |STXT...u|...tBITD|
|00000dc0| 00 00 03 79 00 00 03 78 | 42 49 54 44 00 00 04 4f |...y...x|BITD...O|
|00000dd0| 00 00 03 7b 42 49 54 44 | 00 00 03 7e 00 00 03 7d |...{BITD|...~...}|
|00000de0| 42 49 54 44 00 00 03 80 | 00 00 03 7f 42 49 54 44 |BITD....|....BITD|
|00000df0| 00 00 03 83 00 00 03 81 | 42 49 54 44 00 00 03 87 |........|BITD....|
|00000e00| 00 00 03 86 42 49 54 44 | 00 00 02 da 00 00 03 89 |....BITD|........|
|00000e10| 53 54 58 54 00 00 03 8b | 00 00 03 8a 42 49 54 44 |STXT....|....BITD|
|00000e20| 00 00 03 8d 00 00 03 8c | 42 49 54 44 00 00 03 58 |........|BITD...X|
|00000e30| 00 00 03 90 42 49 54 44 | 00 00 04 5b 00 00 03 a3 |....BITD|...[....|
|00000e40| 53 54 58 54 00 00 04 be | 00 00 03 a9 53 54 58 54 |STXT....|....STXT|
|00000e50| 00 00 00 50 00 00 03 bc | 53 54 58 54 00 00 04 42 |...P....|STXT...B|
|00000e60| 00 00 03 c9 53 54 58 54 | 00 00 04 86 00 00 03 cc |....STXT|........|
|00000e70| 53 54 58 54 00 00 04 66 | 00 00 03 d1 53 54 58 54 |STXT...f|....STXT|
|00000e80| 00 00 03 ed 00 00 03 eb | 53 54 58 54 00 00 00 96 |........|STXT....|
|00000e90| 00 00 03 ee 53 54 58 54 | 00 00 05 19 00 00 03 f1 |....STXT|........|
|00000ea0| 53 54 58 54 00 00 00 05 | 00 00 04 00 43 41 53 2a |STXT....|....CAS*|
|00000eb0| 00 00 00 09 00 00 04 00 | 46 58 6d 70 00 00 00 08 |........|FXmp....|
|00000ec0| 00 00 04 00 46 6d 61 70 | 00 00 00 06 00 00 04 00 |....Fmap|........|
|00000ed0| 4c 63 74 78 00 00 00 04 | 00 00 04 00 56 57 43 46 |Lctx....|....VWCF|
|00000ee0| 00 00 00 0b 00 00 04 00 | 56 57 46 49 00 00 00 0f |........|VWFI....|
|00000ef0| 00 00 04 00 56 57 46 4d | 00 00 04 58 00 00 04 02 |....VWFM|...X....|
|00000f00| 53 54 58 54 00 00 01 fd | 00 00 04 06 53 54 58 54 |STXT....|....STXT|
|00000f10| 00 00 03 e9 00 00 04 12 | 53 54 58 54 00 00 04 c9 |........|STXT....|
|00000f20| 00 00 04 16 53 54 58 54 | 00 00 03 ea 00 00 04 19 |....STXT|........|
|00000f30| 53 54 58 54 00 00 03 19 | 00 00 04 1a 53 54 58 54 |STXT....|....STXT|
|00000f40| 00 00 01 d0 00 00 04 1b | 53 54 58 54 00 00 04 20 |........|STXT... |
|00000f50| 00 00 04 1d 53 54 58 54 | 00 00 06 24 00 00 04 1e |....STXT|...$....|
|00000f60| 53 54 58 54 00 00 05 56 | 00 00 04 27 53 54 58 54 |STXT...V|...'STXT|
|00000f70| 00 00 02 d9 00 00 04 28 | 53 54 58 54 00 00 00 a3 |.......(|STXT....|
|00000f80| 00 00 04 29 53 54 58 54 | 00 00 00 79 00 00 04 2f |...)STXT|...y.../|
|00000f90| 53 54 58 54 00 00 04 55 | 00 00 04 33 53 54 58 54 |STXT...U|...3STXT|
|00000fa0| 00 00 05 c7 00 00 04 34 | 53 54 58 54 00 00 03 91 |.......4|STXT....|
|00000fb0| 00 00 04 35 42 49 54 44 | 00 00 04 51 00 00 04 3a |...5BITD|...Q...:|
|00000fc0| 53 54 58 54 00 00 04 cf | 00 00 04 3c 53 54 58 54 |STXT....|...<STXT|
|00000fd0| 00 00 05 b5 00 00 04 3f | 53 54 58 54 00 00 04 14 |.......?|STXT....|
|00000fe0| 00 00 04 41 53 54 58 54 | 00 00 06 5d 00 00 04 43 |...ASTXT|...]...C|
|00000ff0| 53 54 58 54 00 00 01 00 | 00 00 04 46 53 54 58 54 |STXT....|...FSTXT|
|00001000| 00 00 03 60 00 00 04 4b | 53 54 58 54 00 00 04 d8 |...`...K|STXT....|
|00001010| 00 00 04 57 53 54 58 54 | 00 00 04 62 00 00 04 5c |...WSTXT|...b...\|
|00001020| 53 54 58 54 00 00 05 cc | 00 00 04 5d 53 54 58 54 |STXT....|...]STXT|
|00001030| 00 00 05 14 00 00 04 5e | 53 54 58 54 00 00 04 17 |.......^|STXT....|
|00001040| 00 00 04 60 53 54 58 54 | 00 00 04 36 00 00 04 64 |...`STXT|...6...d|
|00001050| 53 54 58 54 00 00 04 68 | 00 00 04 67 53 54 58 54 |STXT...h|...gSTXT|
|00001060| 00 00 05 5b 00 00 04 6b | 53 54 58 54 00 00 05 ff |...[...k|STXT....|
|00001070| 00 00 04 6c 53 54 58 54 | 00 00 04 72 00 00 04 6e |...lSTXT|...r...n|
|00001080| 53 54 58 54 00 00 04 25 | 00 00 04 6f 53 54 58 54 |STXT...%|...oSTXT|
|00001090| 00 00 04 75 00 00 04 74 | 53 54 58 54 00 00 04 cd |...u...t|STXT....|
|000010a0| 00 00 04 76 53 54 58 54 | 00 00 03 52 00 00 04 79 |...vSTXT|...R...y|
|000010b0| 53 54 58 54 00 00 04 31 | 00 00 04 7a 53 54 58 54 |STXT...1|...zSTXT|
|000010c0| 00 00 04 7c 00 00 04 7b | 53 54 58 54 00 00 04 7f |...|...{|STXT....|
|000010d0| 00 00 04 7e 53 54 58 54 | 00 00 03 10 00 00 04 83 |...~STXT|........|
|000010e0| 53 54 58 54 00 00 04 88 | 00 00 04 87 53 54 58 54 |STXT....|....STXT|
|000010f0| 00 00 04 8a 00 00 04 89 | 53 54 58 54 00 00 01 f0 |........|STXT....|
|00001100| 00 00 04 8b 53 54 58 54 | 00 00 04 8d 00 00 04 8c |....STXT|........|
|00001110| 53 54 58 54 00 00 04 8f | 00 00 04 8e 53 54 58 54 |STXT....|....STXT|
|00001120| 00 00 04 91 00 00 04 90 | 53 54 58 54 00 00 05 39 |........|STXT...9|
|00001130| 00 00 04 92 53 54 58 54 | 00 00 01 c1 00 00 04 93 |....STXT|........|
|00001140| 53 54 58 54 00 00 04 95 | 00 00 04 94 53 54 58 54 |STXT....|....STXT|
|00001150| 00 00 05 e6 00 00 04 96 | 53 54 58 54 00 00 05 b0 |........|STXT....|
|00001160| 00 00 04 97 53 54 58 54 | 00 00 04 9d 00 00 04 98 |....STXT|........|
|00001170| 53 54 58 54 00 00 04 5f | 00 00 04 9b 53 54 58 54 |STXT..._|....STXT|
|00001180| 00 00 04 5a 00 00 04 9c | 53 54 58 54 00 00 02 83 |...Z....|STXT....|
|00001190| 00 00 04 9f 53 54 58 54 | 00 00 04 a1 00 00 04 a0 |....STXT|........|
|000011a0| 53 54 58 54 00 00 04 a3 | 00 00 04 a2 53 54 58 54 |STXT....|....STXT|
|000011b0| 00 00 06 00 00 00 04 a7 | 53 54 58 54 00 00 04 a5 |........|STXT....|
|000011c0| 00 00 04 a9 53 54 58 54 | 00 00 04 a8 00 00 04 ab |....STXT|........|
|000011d0| 53 54 58 54 00 00 04 aa | 00 00 04 ad 53 54 58 54 |STXT....|....STXT|
|000011e0| 00 00 03 2b 00 00 04 b2 | 53 54 58 54 00 00 04 b1 |...+....|STXT....|
|000011f0| 00 00 04 b3 53 54 58 54 | 00 00 05 db 00 00 04 b4 |....STXT|........|
|00001200| 53 54 58 54 00 00 03 2a | 00 00 04 b5 53 54 58 54 |STXT...*|....STXT|
|00001210| 00 00 02 ed 00 00 04 b6 | 53 54 58 54 00 00 04 f8 |........|STXT....|
|00001220| 00 00 04 b7 53 54 58 54 | 00 00 04 ba 00 00 04 bb |....STXT|........|
|00001230| 53 54 58 54 00 00 05 ae | 00 00 04 bc 53 54 58 54 |STXT....|....STXT|
|00001240| 00 00 04 c1 00 00 04 c0 | 53 54 58 54 00 00 03 23 |........|STXT...#|
|00001250| 00 00 04 c2 53 54 58 54 | 00 00 04 c5 00 00 04 c3 |....STXT|........|
|00001260| 53 54 58 54 00 00 02 38 | 00 00 04 c4 53 54 58 54 |STXT...8|....STXT|
|00001270| 00 00 04 c8 00 00 04 c6 | 53 54 58 54 00 00 04 fd |........|STXT....|
|00001280| 00 00 04 c7 53 54 58 54 | 00 00 04 ce 00 00 04 cc |....STXT|........|
|00001290| 53 54 58 54 00 00 05 d7 | 00 00 04 d5 53 54 58 54 |STXT....|....STXT|
|000012a0| 00 00 06 01 00 00 04 d6 | 53 54 58 54 00 00 04 d7 |........|STXT....|
|000012b0| 00 00 04 d9 53 54 58 54 | 00 00 03 b9 00 00 04 dc |....STXT|........|
|000012c0| 53 54 58 54 00 00 04 db | 00 00 04 dd 53 54 58 54 |STXT....|....STXT|
|000012d0| 00 00 03 fe 00 00 04 de | 53 54 58 54 00 00 03 50 |........|STXT...P|
|000012e0| 00 00 04 df 53 54 58 54 | 00 00 01 cd 00 00 04 e0 |....STXT|........|
|000012f0| 53 54 58 54 00 00 05 cd | 00 00 04 e1 53 54 58 54 |STXT....|....STXT|
|00001300| 00 00 06 38 00 00 04 e2 | 53 54 58 54 00 00 05 02 |...8....|STXT....|
|00001310| 00 00 04 e6 53 54 58 54 | 00 00 03 c3 00 00 04 e7 |....STXT|........|
|00001320| 53 54 58 54 00 00 04 ec | 00 00 04 e8 53 54 58 54 |STXT....|....STXT|
|00001330| 00 00 01 4e 00 00 04 ea | 53 54 58 54 00 00 04 ed |...N....|STXT....|
|00001340| 00 00 04 eb 53 54 58 54 | 00 00 00 1d 00 00 04 ef |....STXT|........|
|00001350| 53 54 58 54 00 00 05 b2 | 00 00 04 f0 53 54 58 54 |STXT....|....STXT|
|00001360| 00 00 04 d3 00 00 04 f2 | 53 54 58 54 00 00 04 f4 |........|STXT....|
|00001370| 00 00 04 f3 53 54 58 54 | 00 00 01 f3 00 00 04 f5 |....STXT|........|
|00001380| 53 54 58 54 00 00 02 8f | 00 00 04 f6 53 54 58 54 |STXT....|....STXT|
|00001390| 00 00 03 7c 00 00 04 ff | 42 49 54 44 00 00 00 ab |...|....|BITD....|
|000013a0| 00 00 05 0a 53 54 58 54 | 00 00 03 7a 00 00 05 0f |....STXT|...z....|
|000013b0| 42 49 54 44 00 00 04 82 | 00 00 05 10 42 49 54 44 |BITD....|....BITD|
|000013c0| 00 00 02 6c 00 00 05 16 | 53 54 58 54 00 00 03 34 |...l....|STXT...4|
|000013d0| 00 00 05 1a 53 54 58 54 | 00 00 01 79 00 00 05 20 |....STXT|...y... |
|000013e0| 53 54 58 54 00 00 05 6a | 00 00 05 24 42 49 54 44 |STXT...j|...$BITD|
|000013f0| 00 00 03 0d 00 00 05 27 | 53 54 58 54 00 00 03 92 |.......'|STXT....|
|00001400| 00 00 05 2b 42 49 54 44 | 00 00 04 7d 00 00 05 31 |...+BITD|...}...1|
|00001410| 53 54 58 54 00 00 03 85 | 00 00 05 37 53 54 58 54 |STXT....|...7STXT|
|00001420| 00 00 04 81 00 00 05 3a | 53 54 58 54 00 00 04 d2 |.......:|STXT....|
|00001430| 00 00 05 3c 53 54 58 54 | 00 00 00 ad 00 00 05 4b |...<STXT|.......K|
|00001440| 53 54 58 54 00 00 05 d3 | 00 00 05 60 53 54 58 54 |STXT....|...`STXT|
|00001450| 00 00 05 79 00 00 05 84 | 53 54 58 54 00 00 04 30 |...y....|STXT...0|
|00001460| 00 00 05 95 53 54 58 54 | 00 00 03 e1 00 00 05 ac |....STXT|........|
|00001470| 53 54 58 54 00 00 04 ca | 00 00 05 ad 53 54 58 54 |STXT....|....STXT|
|00001480| 00 00 04 bd 00 00 05 af | 53 54 58 54 00 00 03 da |........|STXT....|
|00001490| 00 00 05 b6 53 54 58 54 | 00 00 04 4d 00 00 05 b7 |....STXT|...M....|
|000014a0| 53 54 58 54 00 00 01 c4 | 00 00 05 bc 53 54 58 54 |STXT....|....STXT|
|000014b0| 00 00 01 94 00 00 05 c0 | 53 54 58 54 00 00 03 b4 |........|STXT....|
|000014c0| 00 00 05 c2 53 54 58 54 | 00 00 03 8f 00 00 05 c5 |....STXT|........|
|000014d0| 42 49 54 44 00 00 04 e4 | 00 00 05 c6 53 54 58 54 |BITD....|....STXT|
|000014e0| 00 00 05 fa 00 00 05 d4 | 53 54 58 54 00 00 00 8e |........|STXT....|
|000014f0| 00 00 05 d6 53 54 58 54 | 00 00 00 bd 00 00 05 de |....STXT|........|
|00001500| 53 54 58 54 00 00 04 3b | 00 00 05 e5 53 54 58 54 |STXT...;|....STXT|
|00001510| 00 00 01 5e 00 00 05 e7 | 53 54 58 54 00 00 02 ca |...^....|STXT....|
|00001520| 00 00 05 f4 53 54 58 54 | 00 00 06 08 00 00 05 f6 |....STXT|........|
|00001530| 53 54 58 54 00 00 05 0b | 00 00 05 fd 53 54 58 54 |STXT....|....STXT|
|00001540| 00 00 01 b8 00 00 06 04 | 53 54 58 54 00 00 04 63 |........|STXT...c|
|00001550| 00 00 06 06 53 54 58 54 | 00 00 03 df 00 00 06 09 |....STXT|........|
|00001560| 53 54 58 54 00 00 04 bf | 00 00 06 0e 53 54 58 54 |STXT....|....STXT|
|00001570| 00 00 04 48 00 00 06 10 | 53 54 58 54 00 00 03 77 |...H....|STXT...w|
|00001580| 00 00 06 11 53 54 58 54 | 00 00 04 2a 00 00 06 20 |....STXT|...*... |
|00001590| 53 54 58 54 00 00 03 6b | 00 00 06 26 53 54 58 54 |STXT...k|...&STXT|
|000015a0| 00 00 02 4c 00 00 06 29 | 53 54 58 54 00 00 02 9e |...L...)|STXT....|
|000015b0| 00 00 06 41 53 54 58 54 | 00 00 01 c5 00 00 06 43 |...ASTXT|.......C|
|000015c0| 53 54 58 54 00 00 01 cb | 00 00 06 49 53 54 58 54 |STXT....|...ISTXT|
|000015d0| 00 00 03 56 00 00 06 6d | 53 54 58 54 00 00 03 56 |...V...m|STXT...V|
|000015e0| 00 00 06 6d 53 54 58 54 | 00 00 03 56 00 00 06 6d |...mSTXT|...V...m|
|000015f0| 53 54 58 54 00 00 03 56 | 00 00 06 6d 53 54 58 54 |STXT...V|...mSTXT|
|00001600| 00 00 03 56 00 00 06 6d | 53 54 58 54 00 00 03 56 |...V...m|STXT...V|
|00001610| 00 00 06 6d 53 54 58 54 | 00 00 03 56 00 00 06 6d |...mSTXT|...V...m|
|00001620| 53 54 58 54 00 00 03 56 | 00 00 06 6d 53 54 58 54 |STXT...V|...mSTXT|
|00001630| 00 00 03 56 00 00 06 6d | 53 54 58 54 00 00 03 56 |...V...m|STXT...V|
|00001640| 00 00 06 6d 53 54 58 54 | 00 00 01 c5 00 00 06 49 |...mSTXT|.......I|
|00001650| 53 54 58 54 00 00 01 c5 | 00 00 06 49 53 54 58 54 |STXT....|...ISTXT|
|00001660| 00 00 04 e2 00 00 06 38 | 53 54 58 54 66 ad 66 be |.......8|STXTf.f.|
|00001670| 00 e5 09 b0 00 ba 5e 00 | eb 00 00 0e 00 00 00 20 |......^.|....... |
|00001680| 00 1b 1e 98 54 69 6d 65 | 73 00 68 73 68 93 68 ad |....Time|s.hsh.h.|
|00001690| 00 e5 09 b0 00 ba 5e 20 | eb 00 00 08 00 00 00 20 |......^ |....... |
|000016a0| 00 1b 1e a0 53 75 6e 64 | 61 79 20 54 69 6d 65 00 |....Sund|ay Time.|
|000016b0| 00 e5 09 b0 00 ba 5e 40 | eb 00 00 07 00 00 00 20 |......^@|....... |
|000016c0| 00 1b 33 04 53 75 6e 64 | 61 79 20 54 69 6d 65 73 |..3.Sund|ay Times|
|000016d0| 00 e5 09 b0 00 ba 5e 60 | eb 00 00 13 00 00 00 20 |......^`|....... |
|000016e0| 00 1b 1e 90 00 0a 6e 0e | ac b0 b3 b2 aa a0 9d 98 |......n.|........|
|000016f0| 00 e5 09 b0 00 ba 5e 80 | eb 00 00 0e 00 00 00 20 |......^.|....... |
|00001700| 00 1b 1f ac 50 6f 77 65 | 72 00 69 63 6f 7d 80 7a |....Powe|r.ico}.z|
|00001710| 00 e5 09 b0 00 ba 5e a0 | eb 00 00 0d 00 00 00 20 |......^.|....... |
|00001720| 00 1b 1f 4c 44 65 73 69 | 67 6e 00 6c 76 84 8b 8f |...LDesi|gn.lv...|
|00001730| 00 e5 09 b0 00 ba 5e c0 | eb 00 00 0d 00 00 00 20 |......^.|....... |
|00001740| 00 1b 1f 24 53 65 6e 73 | 65 73 00 00 00 64 5f 00 |...$Sens|es...d_.|
|00001750| 00 e5 09 b0 00 ba 5e e0 | eb 00 00 0f 00 00 00 20 |......^.|....... |
|00001760| 00 1b 1e b8 4d 69 6e 64 | 00 5c 60 63 6e 7c 83 82 |....Mind|.\`cn|..|
|00001770| 00 e5 09 b0 00 ba 5f 00 | eb 00 00 0f 00 00 00 20 |......_.|....... |
|00001780| 00 1b 1f 48 42 6f 64 79 | 00 71 76 81 8f 98 95 94 |...HBody|.qv.....|
|00001790| 00 e5 09 b0 00 ba 5f 20 | eb 00 00 0d 00 00 00 20 |......_ |....... |
|000017a0| 00 1b 1e e0 53 65 6e 73 | 65 73 00 4a 3e 38 39 3b |....Sens|es.J>89;|
|000017b0| 00 e5 09 b0 00 ba 5f 40 | eb 00 00 0b 00 00 00 20 |......_@|....... |
|000017c0| 00 1b 1e b4 70 61 72 74 | 77 6f 72 6b 00 8d a5 b1 |....part|work....|
|000017d0| 00 e5 09 b0 00 ba 5f 60 | eb 00 00 0b 00 00 00 20 |......_`|....... |
|000017e0| 00 1b 2e d4 50 61 72 74 | 77 6f 72 6b 56 57 43 46 |....Part|workVWCF|
|000017f0| 00 00 00 50 00 50 04 5d | 00 90 00 c0 02 70 03 40 |...P.P.]|.....p.@|
|00001800| 03 ea 06 2b 0e 00 9a 00 | 00 01 00 00 00 00 00 ff |...+....|........|
|00001810| 00 08 01 01 00 14 cd 28 | 04 5d 00 08 00 00 00 00 |.......(|.]......|
|00001820| c3 7f ff e1 00 38 0f ff | 00 c3 00 19 00 01 7a b5 |.....8..|......z.|
|00001830| 00 00 00 3c 58 d3 20 06 | 01 e0 00 00 00 00 00 00 |...<X. .|........|
|00001840| 00 00 00 00 43 41 53 2a | 00 00 09 08 00 00 00 16 |....CAS*|........|
|00001850| 00 00 00 17 00 00 03 cf | 00 00 00 18 00 00 00 13 |........|........|
|00001860| 00 00 00 1a 00 00 00 10 | 00 00 00 0c 00 00 00 22 |........|......."|
|00001870| 00 00 00 24 00 00 00 25 | 00 00 00 28 00 00 00 0a |...$...%|...(....|
|00001880| 00 00 00 2e 00 00 00 54 | 00 00 00 33 00 00 00 55 |.......T|...3...U|
|00001890| 00 00 00 56 00 00 00 4a | 00 00 00 2a 00 00 00 20 |...V...J|...*... |
|000018a0| 00 00 00 69 00 00 02 0f | 00 00 00 2d 00 00 00 70 |...i....|...-...p|
|000018b0| 00 00 00 68 00 00 00 64 | 00 00 00 1e 00 00 00 6f |...h...d|.......o|
|000018c0| 00 00 00 21 00 00 00 26 | 00 00 00 35 00 00 00 9a |...!...&|...5....|
|000018d0| 00 00 00 7c 00 00 00 66 | 00 00 00 94 00 00 03 1a |...|...f|........|
|000018e0| 00 00 02 be 00 00 04 41 | 00 00 02 ba 00 00 00 87 |.......A|........|
|000018f0| 00 00 00 3a 00 00 02 e6 | 00 00 03 ff 00 00 02 e7 |...:....|........|
|00001900| 00 00 00 53 00 00 03 3d | 00 00 03 41 00 00 03 44 |...S...=|...A...D|
|00001910| 00 00 03 47 00 00 03 67 | 00 00 03 69 00 00 03 6d |...G...g|...i...m|
|00001920| 00 00 03 65 00 00 03 70 | 00 00 00 7a 00 00 05 24 |...e...p|...z...$|
|00001930| 00 00 00 9f 00 00 00 a6 | 00 00 03 74 00 00 03 78 |........|...t...x|
|00001940| 00 00 05 0f 00 00 03 7b | 00 00 00 47 00 00 00 36 |.......{|...G...6|
|00001950| 00 00 04 ff 00 00 03 7d | 00 00 03 7f 00 00 03 81 |.......}|........|
|00001960| 00 00 03 59 00 00 03 86 | 00 00 03 8a 00 00 03 8c |...Y....|........|
|00001970| 00 00 03 90 00 00 04 35 | 00 00 05 2b 00 00 03 5c |.......5|...+...\|
|00001980| 00 00 03 66 00 00 05 10 | 00 00 05 c5 00 00 00 42 |...f....|.......B|
|00001990| 00 00 00 11 00 00 04 12 | 00 00 04 19 00 00 03 eb |........|........|
|000019a0| 00 00 02 69 00 00 01 cf | 00 00 04 03 00 00 01 f6 |...i....|........|
|000019b0| 00 00 02 ec 00 00 02 16 | 00 00 01 eb 00 00 04 f5 |........|........|
|000019c0| 00 00 01 f4 00 00 02 48 | 00 00 02 51 00 00 02 57 |.......H|...Q...W|
|000019d0| 00 00 02 64 00 00 03 00 | 00 00 04 27 00 00 00 00 |...d....|...'....|
|000019e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000019f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001a00| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001a10| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001a20| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001a30| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001a40| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001a50| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001a60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001a70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001a80| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001a90| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001aa0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001ab0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001ac0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001ad0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001ae0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001af0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001b00| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001b10| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001b20| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001b30| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001b40| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001b50| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001b60| 00 00 00 00 00 00 05 b6 | 00 00 04 1a 00 00 04 16 |........|........|
|00001b70| 00 00 04 06 00 00 03 c9 | 00 00 05 60 00 00 04 60 |........|...`...`|
|00001b80| 00 00 04 1b 00 00 04 1d | 00 00 05 95 00 00 03 f1 |........|........|
|00001b90| 00 00 04 7a 00 00 05 e5 | 00 00 04 b7 00 00 04 3f |...z....|.......?|
|00001ba0| 00 00 04 02 00 00 04 3c | 00 00 04 3a 00 00 04 43 |.......<|...:...C|
|00001bb0| 00 00 06 10 00 00 00 34 | 00 00 05 f6 00 00 04 33 |.......4|.......3|
|00001bc0| 00 00 04 8b 00 00 04 57 | 00 00 04 9c 00 00 04 5d |.......W|.......]|
|00001bd0| 00 00 04 9b 00 00 03 29 | 00 00 02 dc 00 00 05 c0 |.......)|........|
|00001be0| 00 00 01 a5 00 00 04 5c | 00 00 06 06 00 00 03 d1 |.......\|........|
|00001bf0| 00 00 01 d1 00 00 04 67 | 00 00 04 6f 00 00 04 6e |.......g|...o...n|
|00001c00| 00 00 04 74 00 00 04 76 | 00 00 04 79 00 00 04 7b |...t...v|...y...{|
|00001c10| 00 00 05 31 00 00 04 7e | 00 00 03 cc 00 00 04 87 |...1...~|........|
|00001c20| 00 00 04 89 00 00 04 8c | 00 00 04 8e 00 00 04 90 |........|........|
|00001c30| 00 00 04 92 00 00 04 94 | 00 00 04 97 00 00 03 73 |........|.......s|
|00001c40| 00 00 04 96 00 00 04 98 | 00 00 01 7d 00 00 04 9f |........|...}....|
|00001c50| 00 00 04 a0 00 00 04 a2 | 00 00 01 a6 00 00 04 a7 |........|........|
|00001c60| 00 00 04 a9 00 00 04 ab | 00 00 04 ad 00 00 04 b2 |........|........|
|00001c70| 00 00 03 5b 00 00 04 b3 | 00 00 06 20 00 00 05 fd |...[....|... ....|
|00001c80| 00 00 04 b4 00 00 04 bb | 00 00 06 6d 00 00 05 ac |........|...m....|
|00001c90| 00 00 04 bc 00 00 03 a9 | 00 00 05 af 00 00 06 0e |........|........|
|00001ca0| 00 00 04 c0 00 00 04 c3 | 00 00 04 c6 00 00 05 ad |........|........|
|00001cb0| 00 00 04 c4 00 00 04 c7 | 00 00 04 6c 00 00 04 cc |........|...l....|
|00001cc0| 00 00 05 3c 00 00 02 74 | 00 00 04 f2 00 00 05 d4 |...<...t|........|
|00001cd0| 00 00 04 d5 00 00 04 34 | 00 00 06 09 00 00 04 d6 |.......4|........|
|00001ce0| 00 00 04 dc 00 00 04 d9 | 00 00 04 de 00 00 04 e1 |........|........|
|00001cf0| 00 00 04 dd 00 00 04 df | 00 00 03 0c 00 00 04 e2 |........|........|
|00001d00| 00 00 04 e0 00 00 05 c6 | 00 00 04 e6 00 00 04 e7 |........|........|
|00001d10| 00 00 04 e8 00 00 04 eb | 00 00 04 ef 00 00 04 f3 |........|........|
|00001d20| 00 00 04 f6 00 00 02 e8 | 00 00 00 9c 00 00 04 4b |........|.......K|
|00001d30| 00 00 00 1c 00 00 02 89 | 00 00 02 d6 00 00 00 32 |........|.......2|
|00001d40| 00 00 04 2f 00 00 05 d6 | 00 00 00 85 00 00 00 40 |.../....|.......@|
|00001d50| 00 00 03 4c 00 00 00 4d | 00 00 00 84 00 00 00 a7 |...L...M|........|
|00001d60| 00 00 00 38 00 00 04 b6 | 00 00 00 81 00 00 00 80 |...8....|........|
|00001d70| 00 00 00 aa 00 00 05 0a | 00 00 05 4b 00 00 00 9e |........|...K....|
|00001d80| 00 00 00 af 00 00 00 b3 | 00 00 00 b5 00 00 00 b7 |........|........|
|00001d90| 00 00 00 b4 00 00 05 de | 00 00 00 b9 00 00 00 bf |........|........|
|00001da0| 00 00 03 55 00 00 00 b8 | 00 00 00 ba 00 00 00 bc |...U....|........|
|00001db0| 00 00 00 c2 00 00 00 c4 | 00 00 00 c7 00 00 05 c2 |........|........|
|00001dc0| 00 00 00 c8 00 00 00 46 | 00 00 00 c6 00 00 00 cb |.......F|........|
|00001dd0| 00 00 00 ce 00 00 00 cd | 00 00 00 d4 00 00 00 d6 |........|........|
|00001de0| 00 00 06 26 00 00 00 db | 00 00 00 d7 00 00 00 d9 |...&....|........|
|00001df0| 00 00 00 d8 00 00 00 da | 00 00 02 a9 00 00 03 15 |........|........|
|00001e00| 00 00 00 e4 00 00 04 1e | 00 00 00 e5 00 00 00 e7 |........|........|
|00001e10| 00 00 00 ec 00 00 00 eb | 00 00 00 ed 00 00 00 ef |........|........|
|00001e20| 00 00 00 f1 00 00 00 f3 | 00 00 00 f6 00 00 01 03 |........|........|
|00001e30| 00 00 00 fb 00 00 00 fd | 00 00 01 01 00 00 01 05 |........|........|
|00001e40| 00 00 00 5b 00 00 01 07 | 00 00 01 09 00 00 01 0b |...[....|........|
|00001e50| 00 00 01 0d 00 00 01 0f | 00 00 01 11 00 00 01 13 |........|........|
|00001e60| 00 00 01 15 00 00 01 14 | 00 00 01 16 00 00 01 18 |........|........|
|00001e70| 00 00 01 1a 00 00 01 1c | 00 00 01 1f 00 00 01 21 |........|.......!|
|00001e80| 00 00 01 71 00 00 01 75 | 00 00 01 1e 00 00 01 20 |...q...u|....... |
|00001e90| 00 00 01 23 00 00 01 22 | 00 00 01 24 00 00 01 26 |...#..."|...$...&|
|00001ea0| 00 00 01 28 00 00 01 2a | 00 00 01 2c 00 00 01 2e |...(...*|...,....|
|00001eb0| 00 00 01 30 00 00 01 32 | 00 00 01 34 00 00 01 36 |...0...2|...4...6|
|00001ec0| 00 00 01 38 00 00 01 3a | 00 00 01 3c 00 00 01 3e |...8...:|...<...>|
|00001ed0| 00 00 01 40 00 00 01 42 | 00 00 01 44 00 00 01 46 |...@...B|...D...F|
|00001ee0| 00 00 01 48 00 00 04 ea | 00 00 01 4d 00 00 01 4f |...H....|...M...O|
|00001ef0| 00 00 01 51 00 00 01 53 | 00 00 01 55 00 00 01 5a |...Q...S|...U...Z|
|00001f00| 00 00 01 5b 00 00 01 59 | 00 00 03 28 00 00 01 61 |...[...Y|...(...a|
|00001f10| 00 00 00 e2 00 00 01 62 | 00 00 00 e3 00 00 01 65 |.......b|.......e|
|00001f20| 00 00 01 67 00 00 01 69 | 00 00 01 6b 00 00 01 6d |...g...i|...k...m|
|00001f30| 00 00 01 78 00 00 01 70 | 00 00 01 72 00 00 05 84 |...x...p|...r....|
|00001f40| 00 00 01 80 00 00 05 20 | 00 00 01 81 00 00 01 7f |....... |........|
|00001f50| 00 00 00 5d 00 00 04 83 | 00 00 05 3a 00 00 03 63 |...]....|...:...c|
|00001f60| 00 00 01 8b 00 00 01 8d | 00 00 01 90 00 00 01 91 |........|........|
|00001f70| 00 00 01 93 00 00 01 95 | 00 00 01 db 00 00 01 99 |........|........|
|00001f80| 00 00 01 9b 00 00 01 9d | 00 00 01 9c 00 00 01 9e |........|........|
|00001f90| 00 00 01 a1 00 00 01 a3 | 00 00 01 a2 00 00 01 a4 |........|........|
|00001fa0| 00 00 01 a7 00 00 01 ae | 00 00 01 ac 00 00 01 af |........|........|
|00001fb0| 00 00 06 04 00 00 01 b6 | 00 00 01 ba 00 00 01 be |........|........|
|00001fc0| 00 00 01 bd 00 00 01 bb | 00 00 06 43 00 00 06 49 |........|...C...I|
|00001fd0| 00 00 01 bc 00 00 01 c7 | 00 00 05 bc 00 00 02 8b |........|........|
|00001fe0| 00 00 02 87 00 00 02 91 | 00 00 02 93 00 00 02 95 |........|........|
|00001ff0| 00 00 02 97 00 00 02 99 | 00 00 02 9a 00 00 02 9f |........|........|
|00002000| 00 00 02 a1 00 00 01 c3 | 00 00 02 a5 00 00 06 41 |........|.......A|
|00002010| 00 00 02 a0 00 00 02 ab | 00 00 02 ad 00 00 02 af |........|........|
|00002020| 00 00 02 b1 00 00 02 b3 | 00 00 02 b5 00 00 02 b7 |........|........|
|00002030| 00 00 02 b6 00 00 04 46 | 00 00 02 b4 00 00 05 27 |.......F|.......'|
|00002040| 00 00 02 b9 00 00 03 3a | 00 00 03 14 00 00 00 b1 |.......:|........|
|00002050| 00 00 04 93 00 00 04 f0 | 00 00 04 b5 00 00 03 6c |........|.......l|
|00002060| 00 00 03 1d 00 00 03 1f | 00 00 03 21 00 00 05 37 |........|...!...7|
|00002070| 00 00 02 a2 00 00 03 20 | 00 00 00 86 00 00 04 c2 |....... |........|
|00002080| 00 00 00 37 00 00 03 16 | 00 00 02 a8 00 00 02 b0 |...7....|........|
|00002090| 00 00 03 89 00 00 02 d2 | 00 00 02 d4 00 00 02 d7 |........|........|
|000020a0| 00 00 04 28 00 00 00 71 | 00 00 02 bc 00 00 03 4a |...(...q|.......J|
|000020b0| 00 00 04 29 00 00 03 43 | 00 00 03 bc 00 00 03 51 |...)...C|.......Q|
|000020c0| 00 00 00 5c 00 00 04 64 | 00 00 00 65 00 00 00 6b |...\...d|...e...k|
|000020d0| 00 00 00 6d 00 00 00 73 | 00 00 00 7d 00 00 00 88 |...m...s|...}....|
|000020e0| 00 00 00 89 00 00 00 8d | 00 00 00 8f 00 00 01 fb |........|........|
|000020f0| 00 00 00 98 00 00 00 9d | 00 00 00 a5 00 00 03 ee |........|........|
|00002100| 00 00 02 7e 00 00 05 f4 | 00 00 03 a3 00 00 05 b7 |...~....|........|
|00002110| 00 00 03 2f 00 00 02 c1 | 00 00 02 cc 00 00 03 08 |.../....|........|
|00002120| 00 00 02 e4 00 00 06 29 | 00 00 02 fa 00 00 05 e7 |.......)|........|
|00002130| 00 00 04 6b 00 00 03 0b | 00 00 02 f2 00 00 05 1a |...k....|........|
|00002140| 00 00 04 5e 00 00 05 16 | 00 00 06 11 00 00 03 01 |...^....|........|
|00002150| 00 00 02 3a 43 41 53 74 | 00 00 2b f7 00 04 00 00 |...:CASt|..+.....|
|00002160| 2b ed 0b 00 00 03 00 00 | 00 14 00 c2 eb c4 00 00 |+.......|........|
|00002170| 00 00 00 00 00 00 00 00 | 00 02 00 07 00 00 00 00 |........|........|
|00002180| 00 00 2b 8d 00 00 2b 8d | 00 00 2b 8d 00 00 2b 8d |..+...+.|..+...+.|
|00002190| 00 00 2b 8d 00 00 2b a1 | 00 00 2b b7 2d 2d 20 69 |..+...+.|..+.-- i|
|000021a0| 6e 63 6c 75 64 65 64 20 | 66 75 6e 63 74 69 6f 6e |ncluded |function|
|000021b0| 73 3a 0d 2d 2d 20 20 20 | 20 72 65 74 72 69 65 76 |s:.--   | retriev|
|000021c0| 65 72 65 63 28 72 65 63 | 6f 72 64 2c 66 69 6c 65 |erec(rec|ord,file|
|000021d0| 2c 69 6e 64 65 78 29 3a | 20 72 65 74 72 69 65 76 |,index):| retriev|
|000021e0| 65 20 61 6e 20 65 6e 74 | 69 72 65 20 72 65 63 6f |e an ent|ire reco|
|000021f0| 72 64 0d 2d 2d 20 20 20 | 20 72 65 74 72 69 65 76 |rd.--   | retriev|
|00002200| 65 28 72 65 63 6f 72 64 | 2c 66 69 65 6c 64 2c 66 |e(record|,field,f|
|00002210| 69 6c 65 2c 69 6e 64 65 | 78 29 20 20 20 3a 20 72 |ile,inde|x)   : r|
|00002220| 65 74 72 69 65 76 65 73 | 20 61 20 66 69 65 6c 64 |etrieves| a field|
|00002230| 20 66 72 6f 6d 20 61 20 | 72 65 63 6f 72 64 0d 2d | from a |record.-|
|00002240| 2d 20 20 20 20 73 65 61 | 72 63 68 28 73 74 72 69 |-    sea|rch(stri|
|00002250| 6e 67 2c 69 6e 64 65 78 | 6e 61 6d 65 29 20 20 20 |ng,index|name)   |
|00002260| 20 20 20 3a 20 72 65 74 | 75 72 6e 73 20 74 68 65 |   : ret|urns the|
|00002270| 20 72 65 63 6f 72 64 73 | 20 66 6f 6c 6c 6f 77 69 | records| followi|
|00002280| 6e 67 0d 2d 2d 20 20 20 | 20 20 20 20 20 20 20 20 |ng.--   |        |
|00002290| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000022a0| 20 20 20 20 20 20 20 20 | 73 74 72 69 6e 67 20 69 |        |string i|
|000022b0| 6e 20 74 68 65 20 69 6e | 64 65 78 0d 2d 2d 20 20 |n the in|dex.--  |
|000022c0| 20 20 4c 6f 67 69 63 61 | 6c 41 6e 64 28 6c 69 73 |  Logica|lAnd(lis|
|000022d0| 74 41 2c 6c 69 73 74 42 | 29 20 20 20 20 20 20 20 |tA,listB|)       |
|000022e0| 3a 20 72 65 74 75 72 6e | 73 20 61 20 6c 69 73 74 |: return|s a list|
|000022f0| 20 77 68 69 63 68 20 68 | 6f 6c 64 73 20 6f 6e 6c | which h|olds onl|
|00002300| 79 20 6d 65 6d 62 65 72 | 73 20 0d 2d 2d 20 20 20 |y member|s .--   |
|00002310| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00002320| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00002330| 65 78 69 73 74 69 6e 67 | 20 69 6e 20 62 6f 74 68 |existing| in both|
|00002340| 20 6c 69 73 74 41 20 26 | 20 6c 69 73 74 42 0d 2d | listA &| listB.-|
|00002350| 2d 20 20 20 20 73 6f 72 | 74 6c 69 6e 65 73 28 66 |-    sor|tlines(f|
|00002360| 69 65 6c 64 6e 61 6d 65 | 29 20 20 20 20 20 20 20 |ieldname|)       |
|00002370| 20 20 20 3a 20 72 65 74 | 75 72 6e 73 20 61 20 74 |   : ret|urns a t|
|00002380| 65 78 74 20 66 69 65 6c | 64 20 73 6f 72 74 65 64 |ext fiel|d sorted|
|00002390| 20 6f 6e 20 74 68 65 20 | 66 69 72 73 74 20 69 74 | on the |first it|
|000023a0| 65 6d 0d 2d 2d 20 20 20 | 20 73 6f 72 74 69 74 65 |em.--   | sortite|
|000023b0| 6d 73 28 6c 69 73 74 6e | 61 6d 65 29 20 20 20 20 |ms(listn|ame)    |
|000023c0| 20 20 20 20 20 20 20 3a | 20 72 65 74 75 72 6e 73 |       :| returns|
|000023d0| 20 61 20 6c 69 73 74 20 | 73 6f 72 74 65 64 20 62 | a list |sorted b|
|000023e0| 79 20 69 74 65 6d 0d 2d | 2d 20 20 20 20 42 73 65 |y item.-|-    Bse|
|000023f0| 61 72 63 68 28 73 74 72 | 2c 66 69 65 6c 64 29 20 |arch(str|,field) |
|00002400| 20 20 20 20 20 20 20 20 | 20 20 20 3a 20 72 65 74 |        |   : ret|
|00002410| 75 72 6e 73 20 74 68 65 | 20 6c 69 6e 65 20 6e 75 |urns the| line nu|
|00002420| 6d 20 6f 66 20 73 74 72 | 69 6e 67 20 69 6e 20 66 |m of str|ing in f|
|00002430| 69 65 6c 64 0d 2d 2d 20 | 20 20 20 69 42 73 65 61 |ield.-- |   iBsea|
|00002440| 72 63 68 28 69 74 65 6d | 2c 6c 69 73 74 29 20 20 |rch(item|,list)  |
|00002450| 20 20 20 20 20 20 20 20 | 20 3a 20 72 65 74 75 72 |        | : retur|
|00002460| 6e 73 20 74 68 65 20 70 | 6f 73 20 6f 66 20 69 74 |ns the p|os of it|
|00002470| 65 6d 20 69 6e 20 6c 69 | 73 74 0d 2d 2d 2d 2d 2d |em in li|st.-----|
|00002480| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002490| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000024a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000024b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000024c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 0d 2d 2d 20 |--------|----.-- |
|000024d0| 72 65 74 72 69 65 76 65 | 72 65 63 3a 20 72 65 74 |retrieve|rec: ret|
|000024e0| 72 69 65 76 65 20 61 6e | 20 65 6e 74 69 72 65 20 |rieve an| entire |
|000024f0| 72 65 63 6f 72 64 20 66 | 72 6f 6d 20 74 68 65 20 |record f|rom the |
|00002500| 64 61 74 61 62 61 73 65 | 0d 6f 6e 20 72 65 74 72 |database|.on retr|
|00002510| 69 65 76 65 72 65 63 20 | 72 65 63 6f 72 64 2c 20 |ieverec |record, |
|00002520| 66 69 6c 65 6e 61 6d 65 | 2c 20 69 6e 64 65 78 0d |filename|, index.|
|00002530| 20 20 67 6c 6f 62 61 6c | 20 67 50 61 74 68 2c 20 |  global| gPath, |
|00002540| 67 42 69 74 2c 20 67 48 | 44 70 61 74 68 0d 20 20 |gBit, gH|Dpath.  |
|00002550| 0d 20 20 2d 2d 73 74 61 | 72 74 74 69 6d 65 72 0d |.  --sta|rttimer.|
|00002560| 20 20 2d 2d 73 65 74 20 | 6d 79 66 69 6c 65 20 3d |  --set |myfile =|
|00002570| 20 66 69 6c 65 69 6f 28 | 6d 4e 65 77 2c 22 72 65 | fileio(|mNew,"re|
|00002580| 61 64 22 2c 67 50 61 74 | 68 20 20 26 20 66 69 6c |ad",gPat|h  & fil|
|00002590| 65 6e 61 6d 65 29 0d 20 | 20 73 65 74 20 6d 79 66 |ename). | set myf|
|000025a0| 69 6c 65 20 3d 20 66 69 | 6c 65 69 6f 28 6d 4e 65 |ile = fi|leio(mNe|
|000025b0| 77 2c 22 72 65 61 64 22 | 2c 67 48 44 70 61 74 68 |w,"read"|,gHDpath|
|000025c0| 20 26 20 66 69 6c 65 6e | 61 6d 65 29 20 2d 2d 20 | & filen|ame) -- |
|000025d0| 74 68 65 20 64 62 61 73 | 65 20 69 73 20 6f 6e 20 |the dbas|e is on |
|000025e0| 74 68 65 20 68 64 20 6e | 6f 77 0d 20 20 69 66 20 |the hd n|ow.  if |
|000025f0| 6e 6f 74 20 6f 62 6a 65 | 63 74 70 28 6d 79 66 69 |not obje|ctp(myfi|
|00002600| 6c 65 29 20 74 68 65 6e | 0d 20 20 20 20 61 6c 65 |le) then|.    ale|
|00002610| 72 74 20 22 50 72 6f 62 | 6c 65 6d 20 6f 70 65 6e |rt "Prob|lem open|
|00002620| 69 6e 67 20 64 61 74 61 | 62 61 73 65 22 0d 20 20 |ing data|base".  |
|00002630| 20 20 72 65 74 75 72 6e | 20 30 0d 20 20 65 6e 64 |  return| 0.  end|
|00002640| 20 69 66 0d 20 20 0d 20 | 20 69 66 20 69 74 65 6d | if.  . | if item|
|00002650| 20 72 65 63 6f 72 64 20 | 6f 66 20 66 69 65 6c 64 | record |of field|
|00002660| 20 69 6e 64 65 78 20 3c | 3e 20 22 22 20 74 68 65 | index <|> "" the|
|00002670| 6e 0d 20 20 20 20 73 65 | 74 20 74 6d 70 20 3d 20 |n.    se|t tmp = |
|00002680| 69 6e 74 65 67 65 72 28 | 69 74 65 6d 20 72 65 63 |integer(|item rec|
|00002690| 6f 72 64 20 6f 66 20 66 | 69 65 6c 64 20 69 6e 64 |ord of f|ield ind|
|000026a0| 65 78 29 20 20 0d 20 20 | 65 6c 73 65 0d 20 20 20 |ex)  .  |else.   |
|000026b0| 20 61 6c 65 72 74 20 22 | 45 72 72 6f 72 20 6c 6f | alert "|Error lo|
|000026c0| 61 64 69 6e 67 20 72 65 | 63 6f 72 64 3a 20 22 20 |ading re|cord: " |
|000026d0| 26 20 72 65 63 6f 72 64 | 20 26 20 22 20 66 72 6f |& record| & " fro|
|000026e0| 6d 20 74 68 65 20 64 61 | 74 61 62 61 73 65 22 0d |m the da|tabase".|
|000026f0| 20 20 65 6e 64 20 69 66 | 0d 20 20 0d 20 20 73 65 |  end if|.  .  se|
|00002700| 74 20 65 72 72 20 3d 20 | 6d 79 66 69 6c 65 28 6d |t err = |myfile(m|
|00002710| 53 65 74 50 6f 73 69 74 | 69 6f 6e 2c 74 6d 70 29 |SetPosit|ion,tmp)|
|00002720| 0d 20 20 0d 20 20 69 66 | 20 65 72 72 20 74 68 65 |.  .  if| err the|
|00002730| 6e 20 0d 20 20 20 20 61 | 6c 65 72 74 20 22 50 72 |n .    a|lert "Pr|
|00002740| 6f 62 6c 65 6d 20 72 65 | 74 72 69 65 76 69 6e 67 |oblem re|trieving|
|00002750| 20 72 65 63 6f 72 64 20 | 22 20 26 20 72 65 63 6f | record |" & reco|
|00002760| 72 64 20 22 20 75 73 69 | 6e 67 20 66 69 6c 65 69 |rd " usi|ng filei|
|00002770| 6f 22 0d 20 20 65 6c 73 | 65 0d 20 20 20 20 73 65 |o".  els|e.    se|
|00002780| 74 20 74 6d 70 20 3d 20 | 6d 79 66 69 6c 65 28 6d |t tmp = |myfile(m|
|00002790| 52 65 61 64 54 6f 6b 65 | 6e 2c 22 40 22 2c 22 22 |ReadToke|n,"@",""|
|000027a0| 29 20 0d 20 20 20 20 6d | 79 66 69 6c 65 28 6d 44 |) .    m|yfile(mD|
|000027b0| 69 73 70 6f 73 65 29 0d | 20 20 20 20 2d 2d 70 75 |ispose).|    --pu|
|000027c0| 74 20 74 68 65 20 74 69 | 6d 65 72 20 20 20 20 0d |t the ti|mer    .|
|000027d0| 20 20 20 20 72 65 74 75 | 72 6e 20 74 6d 70 0d 20 |    retu|rn tmp. |
|000027e0| 20 65 6e 64 20 69 66 0d | 20 20 0d 65 6e 64 20 72 | end if.|  .end r|
|000027f0| 65 74 72 69 65 76 65 72 | 65 63 0d 0d 2d 2d 2d 2d |etriever|ec..----|
|00002800| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002810| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002820| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002830| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002840| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 0d 0d 2d |--------|-----..-|
|00002850| 2d 20 72 65 74 72 69 65 | 76 65 3a 20 72 65 74 72 |- retrie|ve: retr|
|00002860| 69 65 76 65 20 61 20 66 | 69 65 6c 64 20 66 72 6f |ieve a f|ield fro|
|00002870| 6d 20 61 20 72 65 63 6f | 72 64 20 66 72 6f 6d 20 |m a reco|rd from |
|00002880| 74 68 65 20 64 61 74 61 | 62 61 73 65 0d 6f 6e 20 |the data|base.on |
|00002890| 72 65 74 72 69 65 76 65 | 20 72 65 63 6f 72 64 2c |retrieve| record,|
|000028a0| 66 69 65 6c 64 6e 75 6d | 2c 66 69 6c 65 6e 61 6d |fieldnum|,filenam|
|000028b0| 65 2c 69 6e 64 65 78 0d | 20 20 67 6c 6f 62 61 6c |e,index.|  global|
|000028c0| 20 67 50 61 74 68 2c 20 | 67 42 69 74 2c 20 67 48 | gPath, |gBit, gH|
|000028d0| 44 70 61 74 68 0d 20 20 | 0d 20 20 2d 2d 73 74 61 |Dpath.  |.  --sta|
|000028e0| 72 74 74 69 6d 65 72 0d | 20 20 73 65 74 20 6d 79 |rttimer.|  set my|
|000028f0| 66 69 6c 65 20 3d 20 66 | 69 6c 65 69 6f 28 6d 4e |file = f|ileio(mN|
|00002900| 65 77 2c 22 72 65 61 64 | 22 2c 67 48 44 70 61 74 |ew,"read|",gHDpat|
|00002910| 68 20 26 20 66 69 6c 65 | 6e 61 6d 65 29 0d 20 20 |h & file|name).  |
|00002920| 69 66 20 6e 6f 74 20 6f | 62 6a 65 63 74 70 28 6d |if not o|bjectp(m|
|00002930| 79 66 69 6c 65 29 20 74 | 68 65 6e 0d 20 20 20 20 |yfile) t|hen.    |
|00002940| 61 6c 65 72 74 20 22 50 | 72 6f 62 6c 65 6d 20 6f |alert "P|roblem o|
|00002950| 70 65 6e 69 6e 67 20 64 | 61 74 61 62 61 73 65 22 |pening d|atabase"|
|00002960| 0d 20 20 20 20 72 65 74 | 75 72 6e 20 30 0d 20 20 |.    ret|urn 0.  |
|00002970| 65 6e 64 20 69 66 0d 20 | 20 0d 20 20 73 65 74 20 |end if. | .  set |
|00002980| 74 6d 70 20 3d 20 69 6e | 74 65 67 65 72 28 69 74 |tmp = in|teger(it|
|00002990| 65 6d 20 72 65 63 6f 72 | 64 20 6f 66 20 66 69 65 |em recor|d of fie|
|000029a0| 6c 64 20 69 6e 64 65 78 | 29 0d 20 20 0d 20 20 73 |ld index|).  .  s|
|000029b0| 65 74 20 65 72 72 20 3d | 20 6d 79 66 69 6c 65 28 |et err =| myfile(|
|000029c0| 6d 53 65 74 50 6f 73 69 | 74 69 6f 6e 2c 74 6d 70 |mSetPosi|tion,tmp|
|000029d0| 29 0d 20 20 69 66 20 65 | 72 72 20 74 68 65 6e 20 |).  if e|rr then |
|000029e0| 0d 20 20 20 20 61 6c 65 | 72 74 20 22 70 72 6f 62 |.    ale|rt "prob|
|000029f0| 6c 65 6d 20 72 65 74 72 | 69 65 76 69 6e 67 20 72 |lem retr|ieving r|
|00002a00| 65 63 6f 72 64 22 0d 20 | 20 65 6c 73 65 0d 20 20 |ecord". | else.  |
|00002a10| 20 20 72 65 70 65 61 74 | 20 77 69 74 68 20 69 20 |  repeat| with i |
|00002a20| 3d 20 31 20 74 6f 20 66 | 69 65 6c 64 6e 75 6d 0d |= 1 to f|ieldnum.|
|00002a30| 20 20 20 20 20 20 73 65 | 74 20 74 6d 70 20 3d 20 |      se|t tmp = |
|00002a40| 6d 79 66 69 6c 65 28 6d | 52 65 61 64 4c 69 6e 65 |myfile(m|ReadLine|
|00002a50| 29 20 0d 20 20 20 20 65 | 6e 64 20 72 65 70 65 61 |) .    e|nd repea|
|00002a60| 74 0d 20 20 20 20 73 65 | 74 20 74 6d 70 20 3d 20 |t.    se|t tmp = |
|00002a70| 63 68 61 72 20 31 20 74 | 6f 20 28 74 68 65 20 6e |char 1 t|o (the n|
|00002a80| 75 6d 62 65 72 20 6f 66 | 20 63 68 61 72 73 20 69 |umber of| chars i|
|00002a90| 6e 20 74 6d 70 20 2d 20 | 31 29 20 6f 66 20 74 6d |n tmp - |1) of tm|
|00002aa0| 70 0d 20 20 20 20 6d 79 | 66 69 6c 65 28 6d 44 69 |p.    my|file(mDi|
|00002ab0| 73 70 6f 73 65 29 0d 20 | 20 20 20 72 65 74 75 72 |spose). |   retur|
|00002ac0| 6e 20 74 6d 70 0d 20 20 | 65 6e 64 20 69 66 0d 65 |n tmp.  |end if.e|
|00002ad0| 6e 64 20 72 65 74 72 69 | 65 76 65 0d 2d 2d 2d 2d |nd retri|eve.----|
|00002ae0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002af0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002b00| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002b10| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002b20| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 0d 2d 2d |--------|-----.--|
|00002b30| 20 73 65 61 72 63 68 3a | 20 70 65 72 66 6f 72 6d | search:| perform|
|00002b40| 73 20 61 20 73 65 61 72 | 63 68 20 6f 6e 20 74 68 |s a sear|ch on th|
|00002b50| 65 20 69 6e 64 65 78 65 | 73 0d 2d 2d 0d 2d 2d 20 |e indexe|s.--.-- |
|00002b60| 73 79 6e 74 61 78 3a 20 | 73 65 61 72 63 68 20 20 |syntax: |search  |
|00002b70| 73 74 72 69 6e 67 20 20 | 69 6e 64 65 78 0d 0d 6f |string  |index..o|
|00002b80| 6e 20 73 65 61 72 63 68 | 20 73 74 72 2c 69 6e 64 |n search| str,ind|
|00002b90| 65 78 74 6d 70 0d 20 20 | 0d 20 20 73 65 74 20 74 |extmp.  |.  set t|
|00002ba0| 6d 70 20 3d 20 20 42 73 | 65 61 72 63 68 20 28 73 |mp =  Bs|earch (s|
|00002bb0| 74 72 2c 69 6e 64 65 78 | 74 6d 70 29 20 0d 20 20 |tr,index|tmp) .  |
|00002bc0| 0d 20 20 69 66 20 74 6d | 70 20 74 68 65 6e 0d 20 |.  if tm|p then. |
|00002bd0| 20 20 20 72 65 74 75 72 | 6e 20 69 74 65 6d 20 32 |   retur|n item 2|
|00002be0| 20 74 6f 20 28 74 68 65 | 20 6e 75 6d 62 65 72 20 | to (the| number |
|00002bf0| 6f 66 20 69 74 65 6d 73 | 20 6f 66 20 6c 69 6e 65 |of items| of line|
|00002c00| 20 74 6d 70 20 6f 66 20 | 66 69 65 6c 64 20 69 6e | tmp of |field in|
|00002c10| 64 65 78 74 6d 70 29 20 | 6f 66 c2 0d 20 20 20 20 |dextmp) |of..    |
|00002c20| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00002c30| 20 6c 69 6e 65 20 74 6d | 70 20 6f 66 20 66 69 65 | line tm|p of fie|
|00002c40| 6c 64 20 69 6e 64 65 78 | 74 6d 70 20 20 20 0d 20 |ld index|tmp   . |
|00002c50| 20 65 6c 73 65 0d 20 20 | 20 20 72 65 74 75 72 6e | else.  |  return|
|00002c60| 20 30 0d 20 20 65 6e 64 | 20 69 66 0d 20 20 0d 65 | 0.  end| if.  .e|
|00002c70| 6e 64 20 73 65 61 72 63 | 68 0d 2d 2d 2d 2d 2d 2d |nd searc|h.------|
|00002c80| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002c90| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002ca0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002cb0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002cc0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 0d 6f 6e 20 4c |--------|---.on L|
|00002cd0| 6f 67 69 63 61 6c 41 6e | 64 20 6c 69 73 74 41 2c |ogicalAn|d listA,|
|00002ce0| 6c 69 73 74 42 0d 20 20 | 73 65 74 20 74 6d 70 6c |listB.  |set tmpl|
|00002cf0| 69 73 74 20 3d 20 22 22 | 0d 20 20 0d 20 20 0d 20 |ist = ""|.  .  . |
|00002d00| 20 69 66 20 6c 69 73 74 | 41 20 3d 20 22 22 20 6f | if list|A = "" o|
|00002d10| 72 20 6c 69 73 74 41 20 | 3d 20 30 20 74 68 65 6e |r listA |= 0 then|
|00002d20| 20 72 65 74 75 72 6e 20 | 22 22 0d 20 20 69 66 20 | return |"".  if |
|00002d30| 6c 69 73 74 42 20 3d 20 | 22 22 20 6f 72 20 6c 69 |listB = |"" or li|
|00002d40| 73 74 42 20 3d 20 30 20 | 74 68 65 6e 20 72 65 74 |stB = 0 |then ret|
|00002d50| 75 72 6e 20 22 22 0d 20 | 20 73 65 74 20 6e 75 6d |urn "". | set num|
|00002d60| 41 20 3d 20 74 68 65 20 | 6e 75 6d 62 65 72 20 6f |A = the |number o|
|00002d70| 66 20 69 74 65 6d 73 20 | 6f 66 20 6c 69 73 74 41 |f items |of listA|
|00002d80| 0d 20 20 73 65 74 20 6e | 75 6d 42 20 3d 20 74 68 |.  set n|umB = th|
|00002d90| 65 20 6e 75 6d 62 65 72 | 20 6f 66 20 69 74 65 6d |e number| of item|
|00002da0| 73 20 6f 66 20 6c 69 73 | 74 42 0d 20 20 73 65 74 |s of lis|tB.  set|
|00002db0| 20 70 6f 73 41 20 3d 20 | 31 0d 20 20 73 65 74 20 | posA = |1.  set |
|00002dc0| 70 6f 73 42 20 3d 20 31 | 0d 20 20 0d 20 20 72 65 |posB = 1|.  .  re|
|00002dd0| 70 65 61 74 20 77 68 69 | 6c 65 20 70 6f 73 41 20 |peat whi|le posA |
|00002de0| 3c 3d 20 6e 75 6d 41 20 | 61 6e 64 20 70 6f 73 42 |<= numA |and posB|
|00002df0| 20 3c 3d 20 6e 75 6d 42 | 0d 20 20 20 20 0d 20 20 | <= numB|.    .  |
|00002e00| 20 20 69 66 20 69 6e 74 | 65 67 65 72 28 69 74 65 |  if int|eger(ite|
|00002e10| 6d 20 70 6f 73 41 20 6f | 66 20 6c 69 73 74 41 29 |m posA o|f listA)|
|00002e20| 20 3d 20 69 6e 74 65 67 | 65 72 28 69 74 65 6d 20 | = integ|er(item |
|00002e30| 70 6f 73 42 20 6f 66 20 | 6c 69 73 74 42 29 20 74 |posB of |listB) t|
|00002e40| 68 65 6e 0d 20 20 20 20 | 20 20 70 75 74 20 69 74 |hen.    |  put it|
|00002e50| 65 6d 20 70 6f 73 41 20 | 6f 66 20 6c 69 73 74 41 |em posA |of listA|
|00002e60| 20 26 20 22 2c 22 20 61 | 66 74 65 72 20 74 6d 70 | & "," a|fter tmp|
|00002e70| 6c 69 73 74 0d 20 20 20 | 20 20 20 73 65 74 20 70 |list.   |   set p|
|00002e80| 6f 73 41 20 3d 20 70 6f | 73 41 20 2b 20 31 0d 20 |osA = po|sA + 1. |
|00002e90| 20 20 20 20 20 73 65 74 | 20 70 6f 73 42 20 3d 20 |     set| posB = |
|00002ea0| 70 6f 73 42 20 2b 20 31 | 0d 20 20 20 20 65 6c 73 |posB + 1|.    els|
|00002eb0| 65 0d 20 20 20 20 20 20 | 69 66 20 69 6e 74 65 67 |e.      |if integ|
|00002ec0| 65 72 28 69 74 65 6d 20 | 70 6f 73 41 20 6f 66 20 |er(item |posA of |
|00002ed0| 6c 69 73 74 41 29 20 3c | 20 69 6e 74 65 67 65 72 |listA) <| integer|
|00002ee0| 28 69 74 65 6d 20 70 6f | 73 42 20 6f 66 20 6c 69 |(item po|sB of li|
|00002ef0| 73 74 42 29 20 74 68 65 | 6e 0d 20 20 20 20 20 20 |stB) the|n.      |
|00002f00| 20 20 73 65 74 20 70 6f | 73 41 20 3d 20 70 6f 73 |  set po|sA = pos|
|00002f10| 41 20 2b 20 31 20 20 0d | 20 20 20 20 20 20 65 6c |A + 1  .|      el|
|00002f20| 73 65 0d 20 20 20 20 20 | 20 20 20 73 65 74 20 70 |se.     |   set p|
|00002f30| 6f 73 42 20 3d 20 70 6f | 73 42 20 2b 20 31 0d 20 |osB = po|sB + 1. |
|00002f40| 20 20 20 20 20 65 6e 64 | 20 69 66 0d 20 20 20 20 |     end| if.    |
|00002f50| 20 20 0d 20 20 20 20 65 | 6e 64 20 69 66 0d 20 20 |  .    e|nd if.  |
|00002f60| 20 20 0d 20 20 65 6e 64 | 20 72 65 70 65 61 74 20 |  .  end| repeat |
|00002f70| 0d 20 20 0d 20 20 73 65 | 74 20 74 6d 70 6c 69 73 |.  .  se|t tmplis|
|00002f80| 74 20 3d 20 69 74 65 6d | 20 31 20 74 6f 20 28 74 |t = item| 1 to (t|
|00002f90| 68 65 20 6e 75 6d 62 65 | 72 20 6f 66 20 69 74 65 |he numbe|r of ite|
|00002fa0| 6d 73 20 6f 66 20 74 6d | 70 6c 69 73 74 20 20 2d |ms of tm|plist  -|
|00002fb0| 20 31 29 20 6f 66 20 74 | 6d 70 6c 69 73 74 0d 20 | 1) of t|mplist. |
|00002fc0| 20 2d 2d 73 65 74 20 74 | 6d 70 6c 69 73 74 20 3d | --set t|mplist =|
|00002fd0| 20 73 6f 72 74 69 74 65 | 6d 73 20 28 74 6d 70 6c | sortite|ms (tmpl|
|00002fe0| 69 73 74 29 0d 20 20 0d | 20 20 72 65 74 75 72 6e |ist).  .|  return|
|00002ff0| 20 74 6d 70 6c 69 73 74 | 0d 20 20 0d 65 6e 64 20 | tmplist|.  .end |
|00003000| 4c 6f 67 69 63 61 6c 41 | 6e 64 0d 0d 2d 2d 2d 2d |LogicalA|nd..----|
|00003010| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003020| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003030| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003040| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003050| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 0d 6f 6e |--------|-----.on|
|00003060| 20 4c 6f 67 69 63 61 6c | 4f 72 20 6c 69 73 74 41 | Logical|Or listA|
|00003070| 2c 6c 69 73 74 42 0d 20 | 20 73 65 74 20 74 6d 70 |,listB. | set tmp|
|00003080| 6c 69 73 74 20 3d 20 22 | 22 0d 20 20 0d 20 20 0d |list = "|".  .  .|
|00003090| 20 20 2d 2d 20 69 66 20 | 6c 69 73 74 41 20 3d 20 |  -- if |listA = |
|000030a0| 22 22 20 6f 72 20 6c 69 | 73 74 41 20 3d 20 30 20 |"" or li|stA = 0 |
|000030b0| 74 68 65 6e 20 72 65 74 | 75 72 6e 20 22 22 0d 20 |then ret|urn "". |
|000030c0| 20 2d 2d 20 69 66 20 6c | 69 73 74 42 20 3d 20 22 | -- if l|istB = "|
|000030d0| 22 20 6f 72 20 6c 69 73 | 74 42 20 3d 20 30 20 74 |" or lis|tB = 0 t|
|000030e0| 68 65 6e 20 72 65 74 75 | 72 6e 20 22 22 0d 20 20 |hen retu|rn "".  |
|000030f0| 73 65 74 20 6e 75 6d 41 | 20 3d 20 74 68 65 20 6e |set numA| = the n|
|00003100| 75 6d 62 65 72 20 6f 66 | 20 69 74 65 6d 73 20 6f |umber of| items o|
|00003110| 66 20 6c 69 73 74 41 0d | 20 20 73 65 74 20 6e 75 |f listA.|  set nu|
|00003120| 6d 42 20 3d 20 74 68 65 | 20 6e 75 6d 62 65 72 20 |mB = the| number |
|00003130| 6f 66 20 69 74 65 6d 73 | 20 6f 66 20 6c 69 73 74 |of items| of list|
|00003140| 42 0d 20 20 73 65 74 20 | 70 6f 73 41 20 3d 20 31 |B.  set |posA = 1|
|00003150| 0d 20 20 73 65 74 20 70 | 6f 73 42 20 3d 20 31 0d |.  set p|osB = 1.|
|00003160| 20 20 0d 20 20 69 66 20 | 6c 69 73 74 41 20 3c 3e |  .  if |listA <>|
|00003170| 20 22 22 20 61 6e 64 20 | 6c 69 73 74 42 20 3c 3e | "" and |listB <>|
|00003180| 20 22 22 20 74 68 65 6e | 0d 20 20 20 20 72 65 70 | "" then|.    rep|
|00003190| 65 61 74 20 77 68 69 6c | 65 20 70 6f 73 41 20 3c |eat whil|e posA <|
|000031a0| 3d 20 6e 75 6d 41 20 61 | 6e 64 20 70 6f 73 42 20 |= numA a|nd posB |
|000031b0| 3c 3d 20 6e 75 6d 42 20 | 20 20 0d 20 20 20 20 20 |<= numB |  .     |
|000031c0| 20 69 66 20 69 6e 74 65 | 67 65 72 28 69 74 65 6d | if inte|ger(item|
|000031d0| 20 70 6f 73 41 20 6f 66 | 20 6c 69 73 74 41 29 20 | posA of| listA) |
|000031e0| 3d 20 69 6e 74 65 67 65 | 72 28 69 74 65 6d 20 70 |= intege|r(item p|
|000031f0| 6f 73 42 20 6f 66 20 6c | 69 73 74 42 29 20 74 68 |osB of l|istB) th|
|00003200| 65 6e 0d 20 20 20 20 20 | 20 20 20 70 75 74 20 69 |en.     |   put i|
|00003210| 74 65 6d 20 70 6f 73 41 | 20 6f 66 20 6c 69 73 74 |tem posA| of list|
|00003220| 41 20 26 20 22 2c 22 20 | 61 66 74 65 72 20 74 6d |A & "," |after tm|
|00003230| 70 6c 69 73 74 0d 20 20 | 20 20 20 20 20 20 73 65 |plist.  |      se|
|00003240| 74 20 70 6f 73 41 20 3d | 20 70 6f 73 41 20 2b 20 |t posA =| posA + |
|00003250| 31 0d 20 20 20 20 20 20 | 20 20 73 65 74 20 70 6f |1.      |  set po|
|00003260| 73 42 20 3d 20 70 6f 73 | 42 20 2b 20 31 0d 20 20 |sB = pos|B + 1.  |
|00003270| 20 20 20 20 65 6c 73 65 | 0d 20 20 20 20 20 20 20 |    else|.       |
|00003280| 20 69 66 20 69 6e 74 65 | 67 65 72 28 69 74 65 6d | if inte|ger(item|
|00003290| 20 70 6f 73 41 20 6f 66 | 20 6c 69 73 74 41 29 20 | posA of| listA) |
|000032a0| 3c 20 69 6e 74 65 67 65 | 72 28 69 74 65 6d 20 70 |< intege|r(item p|
|000032b0| 6f 73 42 20 6f 66 20 6c | 69 73 74 42 29 20 74 68 |osB of l|istB) th|
|000032c0| 65 6e 0d 20 20 20 20 20 | 20 20 20 20 20 70 75 74 |en.     |     put|
|000032d0| 20 69 74 65 6d 20 70 6f | 73 41 20 6f 66 20 6c 69 | item po|sA of li|
|000032e0| 73 74 41 20 26 20 22 2c | 22 20 61 66 74 65 72 20 |stA & ",|" after |
|000032f0| 74 6d 70 6c 69 73 74 0d | 20 20 20 20 20 20 20 20 |tmplist.|        |
|00003300| 20 20 73 65 74 20 70 6f | 73 41 20 3d 20 70 6f 73 |  set po|sA = pos|
|00003310| 41 20 2b 20 31 20 20 0d | 20 20 20 20 20 20 20 20 |A + 1  .|        |
|00003320| 65 6c 73 65 0d 20 20 20 | 20 20 20 20 20 20 20 70 |else.   |       p|
|00003330| 75 74 20 69 74 65 6d 20 | 70 6f 73 42 20 6f 66 20 |ut item |posB of |
|00003340| 6c 69 73 74 42 20 26 20 | 22 2c 22 20 61 66 74 65 |listB & |"," afte|
|00003350| 72 20 74 6d 70 6c 69 73 | 74 0d 20 20 20 20 20 20 |r tmplis|t.      |
|00003360| 20 20 20 20 73 65 74 20 | 70 6f 73 42 20 3d 20 70 |    set |posB = p|
|00003370| 6f 73 42 20 2b 20 31 0d | 20 20 20 20 20 20 20 20 |osB + 1.|        |
|00003380| 65 6e 64 20 69 66 0d 20 | 20 20 20 20 20 20 20 0d |end if. |       .|
|00003390| 20 20 20 20 20 20 65 6e | 64 20 69 66 0d 20 20 20 |      en|d if.   |
|000033a0| 20 20 20 0d 20 20 20 20 | 65 6e 64 20 72 65 70 65 |   .    |end repe|
|000033b0| 61 74 20 0d 20 20 65 6e | 64 20 69 66 0d 20 20 0d |at .  en|d if.  .|
|000033c0| 20 20 69 66 20 70 6f 73 | 41 20 3c 3d 20 6e 75 6d |  if pos|A <= num|
|000033d0| 41 20 61 6e 64 20 6c 69 | 73 74 41 20 3c 3e 20 22 |A and li|stA <> "|
|000033e0| 22 20 74 68 65 6e 0d 20 | 20 20 20 70 75 74 20 69 |" then. |   put i|
|000033f0| 74 65 6d 20 70 6f 73 41 | 20 74 6f 20 6e 75 6d 41 |tem posA| to numA|
|00003400| 20 6f 66 20 6c 69 73 74 | 41 20 26 20 22 2c 22 20 | of list|A & "," |
|00003410| 61 66 74 65 72 20 74 6d | 70 6c 69 73 74 0d 20 20 |after tm|plist.  |
|00003420| 65 6c 73 65 20 69 66 20 | 70 6f 73 42 20 3c 3d 20 |else if |posB <= |
|00003430| 6e 75 6d 42 20 74 68 65 | 6e 0d 20 20 20 20 70 75 |numB the|n.    pu|
|00003440| 74 20 69 74 65 6d 20 70 | 6f 73 42 20 74 6f 20 6e |t item p|osB to n|
|00003450| 75 6d 42 20 6f 66 20 6c | 69 73 74 42 20 26 20 22 |umB of l|istB & "|
|00003460| 2c 22 20 61 66 74 65 72 | 20 74 6d 70 6c 69 73 74 |," after| tmplist|
|00003470| 0d 20 20 65 6e 64 20 69 | 66 0d 20 20 0d 20 20 73 |.  end i|f.  .  s|
|00003480| 65 74 20 74 6d 70 6c 69 | 73 74 20 3d 20 69 74 65 |et tmpli|st = ite|
|00003490| 6d 20 31 20 74 6f 20 28 | 74 68 65 20 6e 75 6d 62 |m 1 to (|the numb|
|000034a0| 65 72 20 6f 66 20 69 74 | 65 6d 73 20 6f 66 20 74 |er of it|ems of t|
|000034b0| 6d 70 6c 69 73 74 20 20 | 2d 20 31 29 20 6f 66 20 |mplist  |- 1) of |
|000034c0| 74 6d 70 6c 69 73 74 0d | 20 20 2d 2d 73 65 74 20 |tmplist.|  --set |
|000034d0| 74 6d 70 6c 69 73 74 20 | 3d 20 73 6f 72 74 69 74 |tmplist |= sortit|
|000034e0| 65 6d 73 20 28 74 6d 70 | 6c 69 73 74 29 0d 20 20 |ems (tmp|list).  |
|000034f0| 0d 20 20 72 65 74 75 72 | 6e 20 74 6d 70 6c 69 73 |.  retur|n tmplis|
|00003500| 74 0d 20 20 0d 65 6e 64 | 20 4c 6f 67 69 63 61 6c |t.  .end| Logical|
|00003510| 4f 72 0d 0d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |Or..----|--------|
|00003520| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003530| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003540| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003550| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003560| 2d 2d 2d 2d 2d 0d 0d 2d | 2d 20 6d 6f 64 69 66 69 |-----..-|- modifi|
|00003570| 65 64 20 74 6f 20 63 6f | 6d 70 61 72 65 20 6f 6e |ed to co|mpare on|
|00003580| 20 69 74 65 6d 20 31 20 | 69 6e 73 74 65 61 64 20 | item 1 |instead |
|00003590| 6f 66 20 74 68 65 20 77 | 68 6f 6c 65 20 6c 69 6e |of the w|hole lin|
|000035a0| 65 0d 6f 6e 20 42 73 65 | 61 72 63 68 20 73 74 72 |e.on Bse|arch str|
|000035b0| 2c 20 74 78 74 0d 20 20 | 0d 20 20 73 65 74 20 74 |, txt.  |.  set t|
|000035c0| 78 74 20 3d 20 74 68 65 | 20 6e 75 6d 62 65 72 20 |xt = the| number |
|000035d0| 6f 66 20 63 61 73 74 20 | 74 78 74 0d 20 20 73 65 |of cast |txt.  se|
|000035e0| 74 20 73 74 61 72 74 20 | 3d 20 31 0d 20 20 73 65 |t start |= 1.  se|
|000035f0| 74 20 65 6e 64 20 3d 20 | 74 68 65 20 6e 75 6d 62 |t end = |the numb|
|00003600| 65 72 20 6f 66 20 6c 69 | 6e 65 73 20 6f 66 20 66 |er of li|nes of f|
|00003610| 69 65 6c 64 20 74 78 74 | 20 20 0d 20 20 73 65 74 |ield txt|  .  set|
|00003620| 20 6d 69 64 64 6c 65 20 | 3d 20 28 73 74 61 72 74 | middle |= (start|
|00003630| 20 2b 20 65 6e 64 29 20 | 2f 20 32 20 20 0d 20 20 | + end) |/ 2  .  |
|00003640| 0d 20 20 2d 2d 70 75 74 | 20 22 73 74 72 20 3d 20 |.  --put| "str = |
|00003650| 22 20 26 20 73 74 72 20 | 26 26 20 22 20 74 78 74 |" & str |&& " txt|
|00003660| 20 3d 20 22 20 26 26 20 | 74 78 74 0d 20 20 2d 2d | = " && |txt.  --|
|00003670| 20 62 73 65 61 72 63 68 | 20 6d 65 63 68 61 6e 69 | bsearch| mechani|
|00003680| 73 6d 0d 20 20 2d 2d 20 | 63 6f 6d 70 61 72 65 20 |sm.  -- |compare |
|00003690| 74 68 65 20 73 74 72 20 | 74 6f 20 74 68 65 20 6d |the str |to the m|
|000036a0| 69 64 64 6c 65 20 6c 69 | 6e 65 20 6f 66 20 74 68 |iddle li|ne of th|
|000036b0| 65 20 66 69 65 6c 64 0d | 20 20 2d 2d 20 69 66 20 |e field.|  -- if |
|000036c0| 73 74 72 20 3c 20 74 68 | 65 20 6d 69 64 64 6c 65 |str < th|e middle|
|000036d0| 20 6c 69 6e 65 20 74 68 | 65 6e 20 73 65 74 20 65 | line th|en set e|
|000036e0| 6e 64 20 74 6f 20 62 65 | 20 74 68 65 20 6d 69 64 |nd to be| the mid|
|000036f0| 64 6c 65 0d 20 20 2d 2d | 20 69 66 20 73 74 72 20 |dle.  --| if str |
|00003700| 3e 20 6d 69 64 64 6c 65 | 20 74 68 65 6e 20 73 65 |> middle| then se|
|00003710| 74 20 73 74 61 72 74 20 | 3d 20 6d 69 64 64 6c 65 |t start |= middle|
|00003720| 0d 20 20 2d 2d 20 69 66 | 20 73 74 72 20 3d 20 6d |.  -- if| str = m|
|00003730| 69 64 64 6c 65 20 74 68 | 65 6e 20 79 6f 75 27 72 |iddle th|en you'r|
|00003740| 65 20 73 65 74 0d 20 20 | 0d 20 20 72 65 70 65 61 |e set.  |.  repea|
|00003750| 74 20 77 68 69 6c 65 20 | 73 74 72 20 3c 3e 20 69 |t while |str <> i|
|00003760| 74 65 6d 20 31 20 6f 66 | 20 6c 69 6e 65 20 6d 69 |tem 1 of| line mi|
|00003770| 64 64 6c 65 20 6f 66 20 | 66 69 65 6c 64 20 74 78 |ddle of |field tx|
|00003780| 74 0d 20 20 20 20 0d 20 | 20 20 20 0d 20 20 20 20 |t.    . |   .    |
|00003790| 69 66 20 73 74 72 20 3d | 20 69 74 65 6d 20 31 20 |if str =| item 1 |
|000037a0| 6f 66 20 6c 69 6e 65 20 | 65 6e 64 20 6f 66 20 66 |of line |end of f|
|000037b0| 69 65 6c 64 20 74 78 74 | 20 74 68 65 6e 0d 20 20 |ield txt| then.  |
|000037c0| 20 20 20 20 72 65 74 75 | 72 6e 20 65 6e 64 0d 20 |    retu|rn end. |
|000037d0| 20 20 20 65 6e 64 20 69 | 66 0d 20 20 20 20 0d 20 |   end i|f.    . |
|000037e0| 20 20 20 69 66 20 73 74 | 61 72 74 20 3d 20 6d 69 |   if st|art = mi|
|000037f0| 64 64 6c 65 20 74 68 65 | 6e 0d 20 20 20 20 20 20 |ddle the|n.      |
|00003800| 72 65 74 75 72 6e 20 30 | 0d 20 20 20 20 65 6e 64 |return 0|.    end|
|00003810| 20 69 66 20 0d 20 20 20 | 20 0d 20 20 20 20 69 66 | if .   | .    if|
|00003820| 20 73 74 72 20 3c 20 69 | 74 65 6d 20 31 20 6f 66 | str < i|tem 1 of|
|00003830| 20 6c 69 6e 65 20 6d 69 | 64 64 6c 65 20 6f 66 20 | line mi|ddle of |
|00003840| 66 69 65 6c 64 20 74 78 | 74 20 74 68 65 6e 0d 20 |field tx|t then. |
|00003850| 20 20 20 20 20 73 65 74 | 20 65 6e 64 20 3d 20 6d |     set| end = m|
|00003860| 69 64 64 6c 65 0d 20 20 | 20 20 65 6c 73 65 0d 20 |iddle.  |  else. |
|00003870| 20 20 20 20 20 73 65 74 | 20 73 74 61 72 74 20 3d |     set| start =|
|00003880| 20 6d 69 64 64 6c 65 0d | 20 20 20 20 65 6e 64 20 | middle.|    end |
|00003890| 69 66 0d 20 20 20 20 0d | 20 20 20 20 0d 20 20 20 |if.    .|    .   |
|000038a0| 20 73 65 74 20 6d 69 64 | 64 6c 65 20 3d 20 28 73 | set mid|dle = (s|
|000038b0| 74 61 72 74 20 2b 20 65 | 6e 64 29 20 2f 20 32 20 |tart + e|nd) / 2 |
|000038c0| 20 0d 20 20 20 20 0d 20 | 20 65 6e 64 20 72 65 70 | .    . | end rep|
|000038d0| 65 61 74 0d 20 20 0d 20 | 20 69 66 20 73 74 72 20 |eat.  . | if str |
|000038e0| 3d 20 69 74 65 6d 20 31 | 20 6f 66 20 6c 69 6e 65 |= item 1| of line|
|000038f0| 20 6d 69 64 64 6c 65 20 | 6f 66 20 66 69 65 6c 64 | middle |of field|
|00003900| 20 74 78 74 20 74 68 65 | 6e 0d 20 20 20 20 2d 2d | txt the|n.    --|
|00003910| 61 6c 65 72 74 20 73 74 | 72 69 6e 67 28 6d 69 64 |alert st|ring(mid|
|00003920| 64 6c 65 29 20 20 20 20 | 0d 20 20 20 20 72 65 74 |dle)    |.    ret|
|00003930| 75 72 6e 20 6d 69 64 64 | 6c 65 0d 20 20 65 6c 73 |urn midd|le.  els|
|00003940| 65 0d 20 20 20 20 72 65 | 74 75 72 6e 20 30 0d 20 |e.    re|turn 0. |
|00003950| 20 65 6e 64 20 69 66 0d | 20 20 0d 65 6e 64 20 42 | end if.|  .end B|
|00003960| 73 65 61 72 63 68 0d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |search.-|--------|
|00003970| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003980| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003990| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000039a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000039b0| 2d 2d 2d 2d 2d 20 20 0d | 2d 2d 20 73 65 61 72 63 |-----  .|-- searc|
|000039c0| 68 65 73 20 61 6e 20 69 | 74 65 6d 20 6f 6e 20 61 |hes an i|tem on a|
|000039d0| 20 6c 69 73 74 0d 6f 6e | 20 69 42 73 65 61 72 63 | list.on| iBsearc|
|000039e0| 68 20 73 74 72 2c 74 78 | 74 0d 20 20 0d 20 20 73 |h str,tx|t.  .  s|
|000039f0| 65 74 20 73 74 61 72 74 | 20 3d 20 31 0d 20 20 73 |et start| = 1.  s|
|00003a00| 65 74 20 65 6e 64 20 3d | 20 74 68 65 20 6e 75 6d |et end =| the num|
|00003a10| 62 65 72 20 6f 66 20 69 | 74 65 6d 73 20 6f 66 20 |ber of i|tems of |
|00003a20| 66 69 65 6c 64 20 74 78 | 74 20 20 0d 20 20 73 65 |field tx|t  .  se|
|00003a30| 74 20 6d 69 64 64 6c 65 | 20 3d 20 28 73 74 61 72 |t middle| = (star|
|00003a40| 74 20 2b 20 65 6e 64 29 | 20 2f 20 32 20 20 0d 20 |t + end)| / 2  . |
|00003a50| 20 0d 20 20 2d 2d 20 62 | 73 65 61 72 63 68 20 6d | .  -- b|search m|
|00003a60| 65 63 68 61 6e 69 73 6d | 0d 20 20 2d 2d 20 63 6f |echanism|.  -- co|
|00003a70| 6d 70 61 72 65 20 74 68 | 65 20 73 74 72 20 74 6f |mpare th|e str to|
|00003a80| 20 74 68 65 20 6d 69 64 | 64 6c 65 20 6c 69 6e 65 | the mid|dle line|
|00003a90| 20 6f 66 20 74 68 65 20 | 66 69 65 6c 64 0d 20 20 | of the |field.  |
|00003aa0| 2d 2d 20 69 66 20 73 74 | 72 20 3c 20 74 68 65 20 |-- if st|r < the |
|00003ab0| 6d 69 64 64 6c 65 20 6c | 69 6e 65 20 74 68 65 6e |middle l|ine then|
|00003ac0| 20 73 65 74 20 65 6e 64 | 20 74 6f 20 62 65 20 74 | set end| to be t|
|00003ad0| 68 65 20 6d 69 64 64 6c | 65 0d 20 20 2d 2d 20 69 |he middl|e.  -- i|
|00003ae0| 66 20 73 74 72 20 3e 20 | 6d 69 64 64 6c 65 20 74 |f str > |middle t|
|00003af0| 68 65 6e 20 73 65 74 20 | 73 74 61 72 74 20 3d 20 |hen set |start = |
|00003b00| 6d 69 64 64 6c 65 0d 20 | 20 2d 2d 20 69 66 20 73 |middle. | -- if s|
|00003b10| 74 72 20 3d 20 6d 69 64 | 64 6c 65 20 74 68 65 6e |tr = mid|dle then|
|00003b20| 20 79 6f 75 27 72 65 20 | 73 65 74 0d 20 20 2d 2d | you're |set.  --|
|00003b30| 73 65 74 20 73 74 72 20 | 3d 20 69 6e 74 65 67 65 |set str |= intege|
|00003b40| 72 28 73 74 72 29 0d 20 | 20 0d 20 20 72 65 70 65 |r(str). | .  repe|
|00003b50| 61 74 20 77 68 69 6c 65 | 20 73 74 72 20 3c 3e 20 |at while| str <> |
|00003b60| 69 6e 74 65 67 65 72 28 | 69 74 65 6d 20 6d 69 64 |integer(|item mid|
|00003b70| 64 6c 65 20 6f 66 20 74 | 78 74 29 0d 20 20 20 20 |dle of t|xt).    |
|00003b80| 70 75 74 20 73 74 61 72 | 74 20 26 26 20 6d 69 64 |put star|t && mid|
|00003b90| 64 6c 65 20 26 26 20 65 | 6e 64 0d 20 20 20 20 69 |dle && e|nd.    i|
|00003ba0| 66 20 73 74 72 20 3d 20 | 69 6e 74 65 67 65 72 28 |f str = |integer(|
|00003bb0| 69 74 65 6d 20 65 6e 64 | 20 6f 66 20 74 78 74 29 |item end| of txt)|
|00003bc0| 20 74 68 65 6e 0d 20 20 | 20 20 20 20 72 65 74 75 | then.  |    retu|
|00003bd0| 72 6e 20 65 6e 64 0d 20 | 20 20 20 65 6e 64 20 69 |rn end. |   end i|
|00003be0| 66 0d 20 20 20 20 0d 20 | 20 20 20 69 66 20 73 74 |f.    . |   if st|
|00003bf0| 61 72 74 20 3d 20 69 6e | 74 65 67 65 72 28 6d 69 |art = in|teger(mi|
|00003c00| 64 64 6c 65 29 20 74 68 | 65 6e 0d 20 20 20 20 20 |ddle) th|en.     |
|00003c10| 20 72 65 74 75 72 6e 20 | 30 0d 20 20 20 20 65 6e | return |0.    en|
|00003c20| 64 20 69 66 20 0d 20 20 | 20 20 0d 20 20 20 20 69 |d if .  |  .    i|
|00003c30| 66 20 73 74 72 20 3c 20 | 69 6e 74 65 67 65 72 28 |f str < |integer(|
|00003c40| 69 74 65 6d 20 20 6d 69 | 64 64 6c 65 20 6f 66 20 |item  mi|ddle of |
|00003c50| 74 78 74 29 20 74 68 65 | 6e 0d 20 20 20 20 20 20 |txt) the|n.      |
|00003c60| 73 65 74 20 65 6e 64 20 | 3d 20 6d 69 64 64 6c 65 |set end |= middle|
|00003c70| 0d 20 20 20 20 65 6c 73 | 65 0d 20 20 20 20 20 20 |.    els|e.      |
|00003c80| 73 65 74 20 73 74 61 72 | 74 20 3d 20 6d 69 64 64 |set star|t = midd|
|00003c90| 6c 65 0d 20 20 20 20 65 | 6e 64 20 69 66 0d 20 20 |le.    e|nd if.  |
|00003ca0| 20 20 0d 20 20 20 20 0d | 20 20 20 20 73 65 74 20 |  .    .|    set |
|00003cb0| 6d 69 64 64 6c 65 20 3d | 20 28 73 74 61 72 74 20 |middle =| (start |
|00003cc0| 2b 20 65 6e 64 29 20 2f | 20 32 20 20 0d 20 20 20 |+ end) /| 2  .   |
|00003cd0| 20 0d 20 20 65 6e 64 20 | 72 65 70 65 61 74 0d 20 | .  end |repeat. |
|00003ce0| 20 0d 20 20 69 66 20 73 | 74 72 20 3d 20 69 6e 74 | .  if s|tr = int|
|00003cf0| 65 67 65 72 28 69 74 65 | 6d 20 20 6d 69 64 64 6c |eger(ite|m  middl|
|00003d00| 65 20 6f 66 20 74 78 74 | 29 20 74 68 65 6e 0d 20 |e of txt|) then. |
|00003d10| 20 20 20 70 75 74 20 22 | 66 6f 75 6e 64 20 22 26 |   put "|found "&|
|00003d20| 26 73 74 72 26 26 22 20 | 69 6e 20 6c 69 73 74 22 |&str&&" |in list"|
|00003d30| 20 20 20 20 0d 20 20 20 | 20 2d 2d 61 6c 65 72 74 |    .   | --alert|
|00003d40| 20 73 74 72 69 6e 67 28 | 6d 69 64 64 6c 65 29 20 | string(|middle) |
|00003d50| 20 20 20 0d 20 20 20 20 | 72 65 74 75 72 6e 20 6d |   .    |return m|
|00003d60| 69 64 64 6c 65 0d 20 20 | 65 6c 73 65 0d 20 20 20 |iddle.  |else.   |
|00003d70| 20 70 75 74 20 22 64 69 | 64 6e 27 74 20 66 69 6e | put "di|dn't fin|
|00003d80| 64 20 22 26 26 73 74 72 | 0d 20 20 20 20 72 65 74 |d "&&str|.    ret|
|00003d90| 75 72 6e 20 30 0d 20 20 | 65 6e 64 20 69 66 0d 20 |urn 0.  |end if. |
|00003da0| 20 0d 65 6e 64 20 69 42 | 73 65 61 72 63 68 0d 0d | .end iB|search..|
|00003db0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003dc0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003dd0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003de0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003df0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 20 20 |--------|------  |
|00003e00| 0d 2d 2d 20 73 6f 72 74 | 6c 69 6e 65 73 0d 2d 2d |.-- sort|lines.--|
|00003e10| 20 74 68 69 73 20 70 65 | 72 66 6f 72 6d 73 20 61 | this pe|rforms a|
|00003e20| 20 76 65 72 73 69 6f 6e | 20 6f 66 20 62 75 62 62 | version| of bubb|
|00003e30| 6c 65 20 73 6f 72 74 20 | 6f 6e 20 74 68 65 20 6c |le sort |on the l|
|00003e40| 69 6e 65 73 20 0d 2d 2d | 20 6f 66 20 61 20 66 69 |ines .--| of a fi|
|00003e50| 65 6c 64 20 2d 20 69 74 | 20 73 6f 72 74 73 20 62 |eld - it| sorts b|
|00003e60| 79 20 74 68 65 20 66 69 | 72 73 74 20 69 74 65 6d |y the fi|rst item|
|00003e70| 20 6f 6e 20 65 61 63 68 | 20 6c 69 6e 65 0d 0d 6f | on each| line..o|
|00003e80| 6e 20 73 6f 72 74 6c 69 | 6e 65 73 20 74 78 74 0d |n sortli|nes txt.|
|00003e90| 20 20 0d 20 20 73 65 74 | 20 6e 75 6d 20 3d 20 74 |  .  set| num = t|
|00003ea0| 68 65 20 6e 75 6d 62 65 | 72 20 6f 66 20 6c 69 6e |he numbe|r of lin|
|00003eb0| 65 73 20 6f 66 20 66 69 | 65 6c 64 20 74 78 74 0d |es of fi|eld txt.|
|00003ec0| 20 20 73 65 74 20 74 6d | 70 32 20 3d 20 74 68 65 |  set tm|p2 = the|
|00003ed0| 20 6e 75 6d 62 65 72 20 | 6f 66 20 63 61 73 74 20 | number |of cast |
|00003ee0| 74 78 74 0d 20 20 72 65 | 70 65 61 74 20 77 69 74 |txt.  re|peat wit|
|00003ef0| 68 20 69 20 3d 20 31 20 | 74 6f 20 6e 75 6d 0d 20 |h i = 1 |to num. |
|00003f00| 20 20 20 73 65 74 20 66 | 6c 61 67 20 3d 20 30 20 |   set f|lag = 0 |
|00003f10| 0d 20 20 20 20 72 65 70 | 65 61 74 20 77 69 74 68 |.    rep|eat with|
|00003f20| 20 6a 20 3d 20 32 20 74 | 6f 20 6e 75 6d 0d 20 20 | j = 2 t|o num.  |
|00003f30| 20 20 20 20 69 66 20 69 | 74 65 6d 20 31 20 6f 66 |    if i|tem 1 of|
|00003f40| 20 6c 69 6e 65 20 6a 20 | 6f 66 20 66 69 65 6c 64 | line j |of field|
|00003f50| 20 74 6d 70 32 20 3c 20 | 69 74 65 6d 20 31 20 6f | tmp2 < |item 1 o|
|00003f60| 66 20 6c 69 6e 65 20 28 | 6a 2d 31 29 20 6f 66 20 |f line (|j-1) of |
|00003f70| 66 69 65 6c 64 20 74 6d | 70 32 20 74 68 65 6e 0d |field tm|p2 then.|
|00003f80| 20 20 20 20 20 20 20 20 | 73 65 74 20 66 6c 61 67 |        |set flag|
|00003f90| 20 3d 20 31 20 20 20 20 | 20 20 20 20 0d 20 20 20 | = 1    |    .   |
|00003fa0| 20 20 20 20 20 73 65 74 | 20 74 6d 70 20 3d 20 6c |     set| tmp = l|
|00003fb0| 69 6e 65 20 6a 2d 31 20 | 6f 66 20 66 69 65 6c 64 |ine j-1 |of field|
|00003fc0| 20 74 6d 70 32 0d 20 20 | 20 20 20 20 20 20 70 75 | tmp2.  |      pu|
|00003fd0| 74 20 6c 69 6e 65 20 6a | 20 6f 66 20 66 69 65 6c |t line j| of fiel|
|00003fe0| 64 20 74 78 74 20 69 6e | 74 6f 20 6c 69 6e 65 20 |d txt in|to line |
|00003ff0| 28 6a 2d 31 29 20 6f 66 | 20 66 69 65 6c 64 20 74 |(j-1) of| field t|
|00004000| 6d 70 32 0d 20 20 20 20 | 20 20 20 20 70 75 74 20 |mp2.    |    put |
|00004010| 74 6d 70 20 69 6e 74 6f | 20 6c 69 6e 65 20 6a 20 |tmp into| line j |
|00004020| 6f 66 20 66 69 65 6c 64 | 20 74 6d 70 32 20 20 20 |of field| tmp2   |
|00004030| 20 20 20 20 0d 20 20 20 | 20 20 20 65 6e 64 20 69 |    .   |   end i|
|00004040| 66 0d 20 20 20 20 65 6e | 64 20 72 65 70 65 61 74 |f.    en|d repeat|
|00004050| 0d 20 20 20 20 69 66 20 | 66 6c 61 67 20 3d 20 30 |.    if |flag = 0|
|00004060| 20 74 68 65 6e 20 65 78 | 69 74 20 72 65 70 65 61 | then ex|it repea|
|00004070| 74 0d 20 20 65 6e 64 20 | 72 65 70 65 61 74 0d 65 |t.  end |repeat.e|
|00004080| 6e 64 20 73 6f 72 74 0d | 0d 2d 2d 2d 2d 2d 2d 2d |nd sort.|.-------|
|00004090| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000040a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000040b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000040c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000040d0| 2d 2d 2d 2d 2d 2d 2d 20 | 20 0d 2d 2d 20 73 6f 72 |------- | .-- sor|
|000040e0| 74 69 74 65 6d 73 0d 2d | 2d 20 74 68 69 73 20 70 |titems.-|- this p|
|000040f0| 65 72 66 6f 72 6d 73 20 | 61 20 76 65 72 73 69 6f |erforms |a versio|
|00004100| 6e 20 6f 66 20 62 75 62 | 62 6c 65 20 73 6f 72 74 |n of bub|ble sort|
|00004110| 20 6f 6e 20 74 68 65 20 | 69 74 65 6d 73 20 0d 2d | on the |items .-|
|00004120| 2d 20 6f 66 20 61 20 6c | 69 6e 65 0d 0d 6f 6e 20 |- of a l|ine..on |
|00004130| 73 6f 72 74 69 74 65 6d | 73 20 74 78 74 0d 20 20 |sortitem|s txt.  |
|00004140| 0d 20 20 69 66 20 74 78 | 74 20 3d 20 22 22 20 74 |.  if tx|t = "" t|
|00004150| 68 65 6e 20 72 65 74 75 | 72 6e 20 22 22 0d 20 20 |hen retu|rn "".  |
|00004160| 73 65 74 20 6e 75 6d 20 | 3d 20 74 68 65 20 6e 75 |set num |= the nu|
|00004170| 6d 62 65 72 20 6f 66 20 | 69 74 65 6d 73 20 6f 66 |mber of |items of|
|00004180| 20 74 78 74 0d 20 20 72 | 65 70 65 61 74 20 77 69 | txt.  r|epeat wi|
|00004190| 74 68 20 69 20 3d 20 31 | 20 74 6f 20 6e 75 6d 0d |th i = 1| to num.|
|000041a0| 20 20 20 20 73 65 74 20 | 66 6c 61 67 20 3d 20 30 |    set |flag = 0|
|000041b0| 20 0d 20 20 20 20 72 65 | 70 65 61 74 20 77 69 74 | .    re|peat wit|
|000041c0| 68 20 6a 20 3d 20 32 20 | 74 6f 20 6e 75 6d 0d 20 |h j = 2 |to num. |
|000041d0| 20 20 20 20 20 69 66 20 | 69 74 65 6d 20 6a 20 6f |     if |item j o|
|000041e0| 66 20 74 78 74 20 3c 20 | 69 74 65 6d 20 28 6a 2d |f txt < |item (j-|
|000041f0| 31 29 20 6f 66 20 74 78 | 74 20 74 68 65 6e 0d 20 |1) of tx|t then. |
|00004200| 20 20 20 20 20 20 20 73 | 65 74 20 66 6c 61 67 20 |       s|et flag |
|00004210| 3d 20 31 20 20 20 20 20 | 20 20 20 0d 20 20 20 20 |= 1     |   .    |
|00004220| 20 20 20 20 73 65 74 20 | 74 6d 70 20 3d 20 69 74 |    set |tmp = it|
|00004230| 65 6d 20 6a 2d 31 20 6f | 66 20 74 78 74 0d 20 20 |em j-1 o|f txt.  |
|00004240| 20 20 20 20 20 20 70 75 | 74 20 69 74 65 6d 20 6a |      pu|t item j|
|00004250| 20 6f 66 20 74 78 74 20 | 69 6e 74 6f 20 69 74 65 | of txt |into ite|
|00004260| 6d 20 28 6a 2d 31 29 20 | 6f 66 20 74 78 74 0d 20 |m (j-1) |of txt. |
|00004270| 20 20 20 20 20 20 20 70 | 75 74 20 74 6d 70 20 69 |       p|ut tmp i|
|00004280| 6e 74 6f 20 69 74 65 6d | 20 6a 20 6f 66 20 74 78 |nto item| j of tx|
|00004290| 74 20 20 20 20 20 20 20 | 20 0d 20 20 20 20 20 20 |t       | .      |
|000042a0| 65 6e 64 20 69 66 0d 20 | 20 20 20 65 6e 64 20 72 |end if. |   end r|
|000042b0| 65 70 65 61 74 0d 20 20 | 20 20 69 66 20 66 6c 61 |epeat.  |  if fla|
|000042c0| 67 20 3d 20 30 20 74 68 | 65 6e 20 65 78 69 74 20 |g = 0 th|en exit |
|000042d0| 72 65 70 65 61 74 0d 20 | 20 65 6e 64 20 72 65 70 |repeat. | end rep|
|000042e0| 65 61 74 0d 20 20 72 65 | 74 75 72 6e 20 74 78 74 |eat.  re|turn txt|
|000042f0| 0d 65 6e 64 20 73 6f 72 | 74 0d 2d 2d 2d 2d 2d 2d |.end sor|t.------|
|00004300| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004310| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004320| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004330| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004340| 2d 2d 2d 2d 2d 2d 2d 2d | 20 20 0d 2d 2d 20 6d 65 |--------|  .-- me|
|00004350| 72 67 65 20 20 0d 2d 2d | 20 74 68 69 73 20 74 61 |rge  .--| this ta|
|00004360| 6b 65 73 20 32 20 6c 69 | 73 74 73 20 6f 66 20 69 |kes 2 li|sts of i|
|00004370| 74 65 6d 73 20 61 6e 64 | 20 6d 65 72 67 65 73 20 |tems and| merges |
|00004380| 74 68 65 6d 20 2d 20 69 | 2e 65 2e 20 70 75 74 73 |them - i|.e. puts|
|00004390| 20 74 68 65 6d 20 74 6f | 67 65 74 68 65 72 2c 0d | them to|gether,.|
|000043a0| 2d 2d 20 61 6e 64 20 72 | 65 6d 6f 76 65 73 20 64 |-- and r|emoves d|
|000043b0| 75 70 6c 69 63 61 74 65 | 73 20 74 68 65 6e 20 73 |uplicate|s then s|
|000043c0| 6f 72 74 73 20 69 74 0d | 0d 6f 6e 20 6d 65 72 67 |orts it.|.on merg|
|000043d0| 65 20 6c 69 73 74 41 2c | 20 6c 69 73 74 42 0d 20 |e listA,| listB. |
|000043e0| 20 0d 20 20 69 66 20 6c | 69 73 74 41 20 3d 20 22 | .  if l|istA = "|
|000043f0| 22 20 74 68 65 6e 20 72 | 65 74 75 72 6e 20 6c 69 |" then r|eturn li|
|00004400| 73 74 42 0d 20 20 69 66 | 20 6c 69 73 74 42 20 3d |stB.  if| listB =|
|00004410| 20 22 22 20 74 68 65 6e | 20 72 65 74 75 72 6e 20 | "" then| return |
|00004420| 6c 69 73 74 41 0d 20 20 | 73 65 74 20 6c 69 73 74 |listA.  |set list|
|00004430| 4e 65 77 20 3d 20 22 22 | 0d 20 20 0d 20 20 73 65 |New = ""|.  .  se|
|00004440| 74 20 70 6f 73 41 20 3d | 20 31 0d 20 20 73 65 74 |t posA =| 1.  set|
|00004450| 20 70 6f 73 42 20 3d 20 | 31 0d 20 20 73 65 74 20 | posB = |1.  set |
|00004460| 70 6f 73 4e 65 77 20 3d | 20 31 0d 20 20 0d 20 20 |posNew =| 1.  .  |
|00004470| 73 65 74 20 6e 75 6d 41 | 20 3d 20 74 68 65 20 6e |set numA| = the n|
|00004480| 75 6d 62 65 72 20 6f 66 | 20 69 74 65 6d 73 20 6f |umber of| items o|
|00004490| 66 20 6c 69 73 74 41 0d | 20 20 73 65 74 20 6e 75 |f listA.|  set nu|
|000044a0| 6d 42 20 3d 20 74 68 65 | 20 6e 75 6d 62 65 72 20 |mB = the| number |
|000044b0| 6f 66 20 69 74 65 6d 73 | 20 6f 66 20 6c 69 73 74 |of items| of list|
|000044c0| 42 0d 20 20 0d 20 20 72 | 65 70 65 61 74 20 77 68 |B.  .  r|epeat wh|
|000044d0| 69 6c 65 20 70 6f 73 41 | 20 3c 3d 20 6e 75 6d 41 |ile posA| <= numA|
|000044e0| 20 61 6e 64 20 70 6f 73 | 42 20 3c 3d 20 6e 75 6d | and pos|B <= num|
|000044f0| 42 0d 20 20 20 20 69 66 | 20 69 6e 74 65 67 65 72 |B.    if| integer|
|00004500| 28 69 74 65 6d 20 70 6f | 73 41 20 6f 66 20 6c 69 |(item po|sA of li|
|00004510| 73 74 41 29 20 3d 20 69 | 6e 74 65 67 65 72 28 69 |stA) = i|nteger(i|
|00004520| 74 65 6d 20 70 6f 73 42 | 20 6f 66 20 6c 69 73 74 |tem posB| of list|
|00004530| 42 29 20 74 68 65 6e 0d | 20 20 20 20 20 20 70 75 |B) then.|      pu|
|00004540| 74 20 69 74 65 6d 20 70 | 6f 73 41 20 6f 66 20 6c |t item p|osA of l|
|00004550| 69 73 74 41 20 26 20 22 | 2c 22 20 61 66 74 65 72 |istA & "|," after|
|00004560| 20 6c 69 73 74 4e 65 77 | 0d 20 20 20 20 20 20 73 | listNew|.      s|
|00004570| 65 74 20 70 6f 73 41 20 | 3d 20 70 6f 73 41 20 2b |et posA |= posA +|
|00004580| 20 31 0d 20 20 20 20 20 | 20 73 65 74 20 70 6f 73 | 1.     | set pos|
|00004590| 42 20 3d 20 70 6f 73 42 | 20 2b 20 31 0d 20 20 20 |B = posB| + 1.   |
|000045a0| 20 65 6c 73 65 20 69 66 | 20 69 6e 74 65 67 65 72 | else if| integer|
|000045b0| 28 69 74 65 6d 20 70 6f | 73 41 20 6f 66 20 6c 69 |(item po|sA of li|
|000045c0| 73 74 41 29 20 3c 20 69 | 6e 74 65 67 65 72 28 69 |stA) < i|nteger(i|
|000045d0| 74 65 6d 20 70 6f 73 42 | 20 6f 66 20 6c 69 73 74 |tem posB| of list|
|000045e0| 42 29 20 74 68 65 6e 0d | 20 20 20 20 20 20 70 75 |B) then.|      pu|
|000045f0| 74 20 69 74 65 6d 20 70 | 6f 73 41 20 6f 66 20 6c |t item p|osA of l|
|00004600| 69 73 74 41 20 26 20 22 | 2c 22 20 61 66 74 65 72 |istA & "|," after|
|00004610| 20 6c 69 73 74 4e 65 77 | 20 20 20 20 20 20 0d 20 | listNew|      . |
|00004620| 20 20 20 20 20 73 65 74 | 20 70 6f 73 41 20 3d 20 |     set| posA = |
|00004630| 70 6f 73 41 2b 31 0d 20 | 20 20 20 65 6c 73 65 0d |posA+1. |   else.|
|00004640| 20 20 20 20 20 20 70 75 | 74 20 69 74 65 6d 20 70 |      pu|t item p|
|00004650| 6f 73 42 20 6f 66 20 6c | 69 73 74 42 20 26 20 22 |osB of l|istB & "|
|00004660| 2c 22 20 61 66 74 65 72 | 20 6c 69 73 74 4e 65 77 |," after| listNew|
|00004670| 20 20 20 20 20 20 0d 20 | 20 20 20 20 20 73 65 74 |      . |     set|
|00004680| 20 70 6f 73 42 20 3d 20 | 70 6f 73 42 20 2b 20 31 | posB = |posB + 1|
|00004690| 0d 20 20 20 20 65 6e 64 | 20 69 66 0d 20 20 20 20 |.    end| if.    |
|000046a0| 73 65 74 20 70 6f 73 4e | 65 77 20 3d 20 70 6f 73 |set posN|ew = pos|
|000046b0| 4e 65 77 20 2b 20 31 0d | 20 20 65 6e 64 20 72 65 |New + 1.|  end re|
|000046c0| 70 65 61 74 0d 20 20 0d | 20 20 69 66 20 70 6f 73 |peat.  .|  if pos|
|000046d0| 41 20 3c 3d 20 6e 75 6d | 41 20 74 68 65 6e 0d 20 |A <= num|A then. |
|000046e0| 20 20 20 72 65 70 65 61 | 74 20 77 68 69 6c 65 20 |   repea|t while |
|000046f0| 70 6f 73 41 20 3c 3d 20 | 6e 75 6d 41 0d 20 20 20 |posA <= |numA.   |
|00004700| 20 20 20 70 75 74 20 69 | 74 65 6d 20 70 6f 73 41 |   put i|tem posA|
|00004710| 20 6f 66 20 6c 69 73 74 | 41 20 26 20 22 2c 22 20 | of list|A & "," |
|00004720| 61 66 74 65 72 20 6c 69 | 73 74 4e 65 77 0d 20 20 |after li|stNew.  |
|00004730| 20 20 20 20 73 65 74 20 | 70 6f 73 41 20 3d 20 70 |    set |posA = p|
|00004740| 6f 73 41 20 2b 20 31 0d | 20 20 20 20 65 6e 64 20 |osA + 1.|    end |
|00004750| 72 65 70 65 61 74 20 20 | 20 20 0d 20 20 65 6c 73 |repeat  |  .  els|
|00004760| 65 0d 20 20 20 20 72 65 | 70 65 61 74 20 77 68 69 |e.    re|peat whi|
|00004770| 6c 65 20 70 6f 73 42 20 | 3c 3d 20 6e 75 6d 42 0d |le posB |<= numB.|
|00004780| 20 20 20 20 20 20 70 75 | 74 20 69 74 65 6d 20 70 |      pu|t item p|
|00004790| 6f 73 42 20 6f 66 20 6c | 69 73 74 42 20 26 20 22 |osB of l|istB & "|
|000047a0| 2c 22 20 61 66 74 65 72 | 20 6c 69 73 74 4e 65 77 |," after| listNew|
|000047b0| 0d 20 20 20 20 20 20 73 | 65 74 20 70 6f 73 42 20 |.      s|et posB |
|000047c0| 3d 20 70 6f 73 42 20 2b | 20 31 20 20 0d 20 20 20 |= posB +| 1  .   |
|000047d0| 20 65 6e 64 20 72 65 70 | 65 61 74 0d 20 20 65 6e | end rep|eat.  en|
|000047e0| 64 20 69 66 0d 20 20 0d | 20 20 72 65 74 75 72 6e |d if.  .|  return|
|000047f0| 20 6c 69 73 74 4e 65 77 | 0d 65 6e 64 20 6d 65 72 | listNew|.end mer|
|00004800| 67 65 0d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |ge.-----|--------|
|00004810| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004820| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004830| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004840| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004850| 2d 2d 2d 2d 20 0d 0d 2d | 2d 20 73 65 61 72 63 68 |---- ..-|- search|
|00004860| 65 73 20 61 20 73 74 72 | 69 6e 67 20 69 74 65 6d |es a str|ing item|
|00004870| 20 6f 6e 20 61 20 6c 69 | 73 74 0d 6f 6e 20 73 69 | on a li|st.on si|
|00004880| 42 73 65 61 72 63 68 20 | 73 74 72 2c 74 78 74 0d |Bsearch |str,txt.|
|00004890| 20 20 0d 20 20 73 65 74 | 20 73 74 61 72 74 20 3d |  .  set| start =|
|000048a0| 20 31 0d 20 20 73 65 74 | 20 65 6e 64 20 3d 20 74 | 1.  set| end = t|
|000048b0| 68 65 20 6e 75 6d 62 65 | 72 20 6f 66 20 69 74 65 |he numbe|r of ite|
|000048c0| 6d 73 20 6f 66 20 66 69 | 65 6c 64 20 74 78 74 20 |ms of fi|eld txt |
|000048d0| 20 0d 20 20 73 65 74 20 | 6d 69 64 64 6c 65 20 3d | .  set |middle =|
|000048e0| 20 28 73 74 61 72 74 20 | 2b 20 65 6e 64 29 20 2f | (start |+ end) /|
|000048f0| 20 32 20 20 0d 20 20 0d | 20 20 2d 2d 20 62 73 65 | 2  .  .|  -- bse|
|00004900| 61 72 63 68 20 6d 65 63 | 68 61 6e 69 73 6d 0d 20 |arch mec|hanism. |
|00004910| 20 2d 2d 20 63 6f 6d 70 | 61 72 65 20 74 68 65 20 | -- comp|are the |
|00004920| 73 74 72 20 74 6f 20 74 | 68 65 20 6d 69 64 64 6c |str to t|he middl|
|00004930| 65 20 6c 69 6e 65 20 6f | 66 20 74 68 65 20 66 69 |e line o|f the fi|
|00004940| 65 6c 64 0d 20 20 2d 2d | 20 69 66 20 73 74 72 20 |eld.  --| if str |
|00004950| 3c 20 74 68 65 20 6d 69 | 64 64 6c 65 20 6c 69 6e |< the mi|ddle lin|
|00004960| 65 20 74 68 65 6e 20 73 | 65 74 20 65 6e 64 20 74 |e then s|et end t|
|00004970| 6f 20 62 65 20 74 68 65 | 20 6d 69 64 64 6c 65 0d |o be the| middle.|
|00004980| 20 20 2d 2d 20 69 66 20 | 73 74 72 20 3e 20 6d 69 |  -- if |str > mi|
|00004990| 64 64 6c 65 20 74 68 65 | 6e 20 73 65 74 20 73 74 |ddle the|n set st|
|000049a0| 61 72 74 20 3d 20 6d 69 | 64 64 6c 65 0d 20 20 2d |art = mi|ddle.  -|
|000049b0| 2d 20 69 66 20 73 74 72 | 20 3d 20 6d 69 64 64 6c |- if str| = middl|
|000049c0| 65 20 74 68 65 6e 20 79 | 6f 75 27 72 65 20 73 65 |e then y|ou're se|
|000049d0| 74 0d 20 20 0d 20 20 0d | 20 20 72 65 70 65 61 74 |t.  .  .|  repeat|
|000049e0| 20 77 68 69 6c 65 20 73 | 74 72 20 3c 3e 20 28 69 | while s|tr <> (i|
|000049f0| 74 65 6d 20 6d 69 64 64 | 6c 65 20 6f 66 20 74 78 |tem midd|le of tx|
|00004a00| 74 29 0d 20 20 20 20 70 | 75 74 20 73 74 61 72 74 |t).    p|ut start|
|00004a10| 20 26 26 20 6d 69 64 64 | 6c 65 20 26 26 20 65 6e | && midd|le && en|
|00004a20| 64 0d 20 20 20 20 69 66 | 20 73 74 72 20 3d 20 28 |d.    if| str = (|
|00004a30| 69 74 65 6d 20 65 6e 64 | 20 6f 66 20 74 78 74 29 |item end| of txt)|
|00004a40| 20 74 68 65 6e 0d 20 20 | 20 20 20 20 72 65 74 75 | then.  |    retu|
|00004a50| 72 6e 20 65 6e 64 0d 20 | 20 20 20 65 6e 64 20 69 |rn end. |   end i|
|00004a60| 66 0d 20 20 20 20 0d 20 | 20 20 20 69 66 20 73 74 |f.    . |   if st|
|00004a70| 61 72 74 20 3d 20 28 6d | 69 64 64 6c 65 29 20 74 |art = (m|iddle) t|
|00004a80| 68 65 6e 0d 20 20 20 20 | 20 20 72 65 74 75 72 6e |hen.    |  return|
|00004a90| 20 30 0d 20 20 20 20 65 | 6e 64 20 69 66 20 0d 20 | 0.    e|nd if . |
|00004aa0| 20 20 20 0d 20 20 20 20 | 69 66 20 73 74 72 20 3c |   .    |if str <|
|00004ab0| 20 28 69 74 65 6d 20 20 | 6d 69 64 64 6c 65 20 6f | (item  |middle o|
|00004ac0| 66 20 74 78 74 29 20 74 | 68 65 6e 0d 20 20 20 20 |f txt) t|hen.    |
|00004ad0| 20 20 73 65 74 20 65 6e | 64 20 3d 20 6d 69 64 64 |  set en|d = midd|
|00004ae0| 6c 65 0d 20 20 20 20 65 | 6c 73 65 0d 20 20 20 20 |le.    e|lse.    |
|00004af0| 20 20 73 65 74 20 73 74 | 61 72 74 20 3d 20 6d 69 |  set st|art = mi|
|00004b00| 64 64 6c 65 0d 20 20 20 | 20 65 6e 64 20 69 66 0d |ddle.   | end if.|
|00004b10| 20 20 20 20 0d 20 20 20 | 20 0d 20 20 20 20 73 65 |    .   | .    se|
|00004b20| 74 20 6d 69 64 64 6c 65 | 20 3d 20 28 73 74 61 72 |t middle| = (star|
|00004b30| 74 20 2b 20 65 6e 64 29 | 20 2f 20 32 20 20 0d 20 |t + end)| / 2  . |
|00004b40| 20 20 20 0d 20 20 65 6e | 64 20 72 65 70 65 61 74 |   .  en|d repeat|
|00004b50| 0d 20 20 0d 20 20 69 66 | 20 73 74 72 20 3d 20 28 |.  .  if| str = (|
|00004b60| 69 74 65 6d 20 20 6d 69 | 64 64 6c 65 20 6f 66 20 |item  mi|ddle of |
|00004b70| 74 78 74 29 20 74 68 65 | 6e 0d 20 20 20 20 70 75 |txt) the|n.    pu|
|00004b80| 74 20 22 66 6f 75 6e 64 | 20 22 26 26 73 74 72 26 |t "found| "&&str&|
|00004b90| 26 22 20 69 6e 20 6c 69 | 73 74 22 20 20 20 20 0d |&" in li|st"    .|
|00004ba0| 20 20 20 20 2d 2d 61 6c | 65 72 74 20 73 74 72 69 |    --al|ert stri|
|00004bb0| 6e 67 28 6d 69 64 64 6c | 65 29 20 20 20 20 0d 20 |ng(middl|e)    . |
|00004bc0| 20 20 20 72 65 74 75 72 | 6e 20 6d 69 64 64 6c 65 |   retur|n middle|
|00004bd0| 0d 20 20 65 6c 73 65 0d | 20 20 20 20 70 75 74 20 |.  else.|    put |
|00004be0| 22 64 69 64 6e 27 74 20 | 66 69 6e 64 20 22 26 26 |"didn't |find "&&|
|00004bf0| 73 74 72 0d 20 20 20 20 | 72 65 74 75 72 6e 20 30 |str.    |return 0|
|00004c00| 0d 20 20 65 6e 64 20 69 | 66 0d 20 20 0d 65 6e 64 |.  end i|f.  .end|
|00004c10| 20 73 69 42 73 65 61 72 | 63 68 0d 2d 2d 2d 2d 2d | siBsear|ch.-----|
|00004c20| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004c30| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004c40| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004c50| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004c60| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 20 0d 6f 6e |--------|---- .on|
|00004c70| 20 66 69 6e 64 20 73 74 | 72 2c 74 78 74 0d 20 20 | find st|r,txt.  |
|00004c80| 72 65 70 65 61 74 20 77 | 69 74 68 20 69 20 3d 20 |repeat w|ith i = |
|00004c90| 31 20 74 6f 20 74 68 65 | 20 6e 75 6d 62 65 72 20 |1 to the| number |
|00004ca0| 6f 66 20 69 74 65 6d 73 | 20 6f 66 20 66 69 65 6c |of items| of fiel|
|00004cb0| 64 20 74 78 74 0d 20 20 | 20 20 69 66 20 73 74 72 |d txt.  |  if str|
|00004cc0| 20 3d 20 69 74 65 6d 20 | 69 20 6f 66 20 66 69 65 | = item |i of fie|
|00004cd0| 6c 64 20 74 78 74 20 74 | 68 65 6e 20 0d 20 20 20 |ld txt t|hen .   |
|00004ce0| 20 20 20 70 75 74 20 69 | 0d 20 20 20 20 20 20 65 |   put i|.      e|
|00004cf0| 78 69 74 20 72 65 70 65 | 61 74 0d 20 20 20 20 65 |xit repe|at.    e|
|00004d00| 6e 64 20 69 66 0d 20 20 | 65 6e 64 20 72 65 70 65 |nd if.  |end repe|
|00004d10| 61 74 0d 20 20 72 65 74 | 75 72 6e 20 2d 31 0d 65 |at.  ret|urn -1.e|
|00004d20| 6e 64 20 66 69 6e 64 0d | 20 00 2a 00 04 01 dc 02 |nd find.| .*.....|
|00004d30| 7c 00 00 02 a0 00 00 02 | a7 00 00 00 00 00 01 00 ||.......|........|
|00004d40| 00 00 00 00 0b 00 09 00 | 04 00 00 00 09 00 00 00 |........|........|
|00004d50| 00 00 00 6d 43 41 53 74 | 00 00 4c f9 00 04 00 00 |...mCASt|..L.....|
|00004d60| 4c ef 0b 00 00 03 00 00 | 00 14 00 c2 eb c0 00 00 |L.......|........|
|00004d70| 00 00 00 00 00 00 00 00 | 00 03 00 07 00 00 00 00 |........|........|
|00004d80| 00 00 4a ff 00 00 4a ff | 00 00 4a ff 00 00 4a ff |..J...J.|..J...J.|
|00004d90| 00 00 4a ff 00 00 4b 13 | 00 00 4c b9 2d 2d 20 50 |..J...K.|..L.-- P|
|00004da0| 61 72 73 65 72 0d 2d 2d | 20 45 6c 61 6e 20 44 65 |arser.--| Elan De|
|00004db0| 6b 65 6c 0d 2d 2d 20 32 | 37 2f 38 2f 39 35 0d 2d |kel.-- 2|7/8/95.-|
|00004dc0| 2d 0d 2d 2d 20 74 68 69 | 73 20 77 69 6c 6c 20 72 |-.-- thi|s will r|
|00004dd0| 65 61 64 20 74 68 65 20 | 64 61 74 61 62 61 73 65 |ead the |database|
|00004de0| 20 73 63 72 69 70 74 20 | 66 69 6c 65 20 61 6e 64 | script |file and|
|00004df0| 20 67 65 74 20 61 6c 6c | 20 74 68 65 20 75 73 65 | get all| the use|
|00004e00| 66 75 6c 20 0d 2d 2d 20 | 69 6e 66 6f 72 6d 61 74 |ful .-- |informat|
|00004e10| 69 6f 6e 20 6f 6e 20 74 | 68 65 20 64 61 74 61 62 |ion on t|he datab|
|00004e20| 61 73 65 20 66 69 6c 65 | 2c 20 6e 61 6d 65 6c 79 |ase file|, namely|
|00004e30| 3a 0d 2d 2d 0d 2d 2d 20 | 61 29 20 74 68 65 20 6e |:.--.-- |a) the n|
|00004e40| 75 6d 62 65 72 20 6f 66 | 20 63 68 61 70 74 65 72 |umber of| chapter|
|00004e50| 73 0d 2d 2d 20 62 29 20 | 74 68 65 20 63 68 61 70 |s.-- b) |the chap|
|00004e60| 74 65 72 20 6e 61 6d 65 | 73 0d 2d 2d 20 63 29 20 |ter name|s.-- c) |
|00004e70| 74 68 65 20 6e 75 6d 62 | 65 72 20 6f 66 20 61 72 |the numb|er of ar|
|00004e80| 74 69 63 6c 65 73 20 69 | 6e 20 65 61 63 68 20 63 |ticles i|n each c|
|00004e90| 68 61 70 74 65 72 0d 2d | 2d 20 64 29 20 77 68 69 |hapter.-|- d) whi|
|00004ea0| 63 68 20 61 72 74 69 63 | 6c 65 73 20 61 72 65 20 |ch artic|les are |
|00004eb0| 70 69 63 74 75 72 65 73 | 2c 20 63 75 74 74 69 6e |pictures|, cuttin|
|00004ec0| 67 73 2c 20 51 54 27 73 | 2c 20 6f 72 20 73 6f 75 |gs, QT's|, or sou|
|00004ed0| 6e 64 73 0d 2d 2d 20 65 | 29 20 74 68 65 20 63 61 |nds.-- e|) the ca|
|00004ee0| 70 74 69 6f 6e 73 0d 2d | 2d 20 66 29 20 74 68 65 |ptions.-|- f) the|
|00004ef0| 20 61 72 74 69 63 6c 65 | 20 64 61 74 65 20 61 6e | article| date an|
|00004f00| 64 20 6e 65 77 73 70 61 | 70 65 72 20 6e 61 6d 65 |d newspa|per name|
|00004f10| 0d 2d 2d 20 67 29 20 74 | 68 65 20 6e 61 6d 65 20 |.-- g) t|he name |
|00004f20| 6f 66 20 74 68 65 20 61 | 72 74 69 63 6c 65 20 66 |of the a|rticle f|
|00004f30| 69 6c 65 20 6f 6e 20 64 | 69 73 6b 0d 2d 2d 0d 2d |ile on d|isk.--.-|
|00004f40| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004f50| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004f60| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004f70| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004f80| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 0d |--------|-------.|
|00004f90| 6f 6e 20 42 61 74 63 68 | 50 72 6f 63 65 73 73 20 |on Batch|Process |
|00004fa0| 77 6f 72 6c 64 2c 73 74 | 61 72 74 6e 75 6d 0d 20 |world,st|artnum. |
|00004fb0| 20 0d 20 20 70 75 74 20 | 77 6f 72 6c 64 0d 20 20 | .  put |world.  |
|00004fc0| 73 65 74 20 74 68 65 20 | 74 65 78 74 20 6f 66 20 |set the |text of |
|00004fd0| 66 69 65 6c 64 20 28 22 | 63 75 74 74 69 6e 67 69 |field ("|cuttingi|
|00004fe0| 6e 64 65 78 22 26 77 6f | 72 6c 64 29 20 3d 20 22 |ndex"&wo|rld) = "|
|00004ff0| 22 0d 20 20 73 65 74 20 | 74 68 65 20 74 65 78 74 |".  set |the text|
|00005000| 20 6f 66 20 66 69 65 6c | 64 20 22 42 61 74 63 68 | of fiel|d "Batch|
|00005010| 45 72 72 6f 72 73 22 20 | 3d 20 22 22 0d 20 20 42 |Errors" |= "".  B|
|00005020| 61 74 63 68 50 61 72 73 | 65 20 28 77 6f 72 6c 64 |atchPars|e (world|
|00005030| 29 2c 73 74 61 72 74 6e | 75 6d 0d 20 20 2d 2d 20 |),startn|um.  -- |
|00005040| 42 61 74 63 68 49 6e 64 | 65 78 0d 20 20 0d 65 6e |BatchInd|ex.  .en|
|00005050| 64 0d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |d.------|--------|
|00005060| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005070| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005080| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005090| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000050a0| 2d 2d 0d 6f 6e 20 50 72 | 6f 63 65 73 73 50 65 72 |--.on Pr|ocessPer|
|000050b0| 73 6f 6e 20 66 6e 61 6d | 65 0d 20 20 0d 20 20 63 |son fnam|e.  .  c|
|000050c0| 75 72 73 6f 72 20 34 20 | 2d 2d 20 63 6c 6f 63 6b |ursor 4 |-- clock|
|000050d0| 0d 20 20 69 66 20 50 61 | 72 73 65 66 69 6c 65 20 |.  if Pa|rsefile |
|000050e0| 28 66 6e 61 6d 65 20 26 | 20 22 2e 53 43 52 22 29 |(fname &| ".SCR")|
|000050f0| 20 3d 20 2d 31 20 74 68 | 65 6e 0d 20 20 20 20 61 | = -1 th|en.    a|
|00005100| 6c 65 72 74 20 22 70 72 | 6f 62 6c 65 6d 20 77 69 |lert "pr|oblem wi|
|00005110| 74 68 20 73 63 72 69 70 | 74 20 66 69 6c 65 22 0d |th scrip|t file".|
|00005120| 20 20 20 20 63 75 72 73 | 6f 72 20 30 0d 20 20 20 |    curs|or 0.   |
|00005130| 20 67 6f 20 74 6f 20 66 | 72 61 6d 65 20 32 0d 20 | go to f|rame 2. |
|00005140| 20 20 20 61 62 6f 72 74 | 0d 20 20 65 6e 64 20 69 |   abort|.  end i|
|00005150| 66 0d 20 20 0d 20 20 69 | 66 20 4d 61 6b 65 49 6e |f.  .  i|f MakeIn|
|00005160| 64 65 78 20 28 66 6e 61 | 6d 65 20 26 20 22 2e 54 |dex (fna|me & ".T|
|00005170| 58 54 22 29 20 3d 20 2d | 31 20 74 68 65 6e 0d 20 |XT") = -|1 then. |
|00005180| 20 20 20 61 6c 65 72 74 | 20 22 70 72 6f 62 6c 65 |   alert| "proble|
|00005190| 6d 20 77 69 74 68 20 74 | 65 78 74 20 63 75 74 74 |m with t|ext cutt|
|000051a0| 69 6e 67 73 20 66 69 6c | 65 22 0d 20 20 20 20 63 |ings fil|e".    c|
|000051b0| 75 72 73 6f 72 20 30 0d | 20 20 20 20 67 6f 20 74 |ursor 0.|    go t|
|000051c0| 6f 20 66 72 61 6d 65 20 | 32 0d 20 20 20 20 61 62 |o frame |2.    ab|
|000051d0| 6f 72 74 0d 20 20 65 6e | 64 20 69 66 0d 20 20 0d |ort.  en|d if.  .|
|000051e0| 20 20 63 75 72 73 6f 72 | 20 30 0d 65 6e 64 0d 2d |  cursor| 0.end.-|
|000051f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005200| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005210| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005220| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005230| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 0d |--------|-------.|
|00005240| 2d 2d 20 74 68 69 73 20 | 70 61 72 73 65 73 20 61 |-- this |parses a|
|00005250| 6c 6c 20 74 68 65 20 66 | 69 6c 65 73 20 69 6e 20 |ll the f|iles in |
|00005260| 74 68 65 20 63 75 72 72 | 65 6e 74 20 64 69 72 65 |the curr|ent dire|
|00005270| 63 74 6f 72 79 0d 6f 6e | 20 42 61 74 63 68 50 61 |ctory.on| BatchPa|
|00005280| 72 73 65 20 77 6f 72 6c | 64 2c 20 73 74 61 72 74 |rse worl|d, start|
|00005290| 6e 75 6d 0d 20 20 67 6c | 6f 62 61 6c 20 67 4d 61 |num.  gl|obal gMa|
|000052a0| 6b 65 72 4e 61 6d 65 2c | 20 6d 50 61 74 68 2c 20 |kerName,| mPath, |
|000052b0| 67 4d 61 6b 65 72 4e 75 | 6d 0d 20 20 0d 20 20 73 |gMakerNu|m.  .  s|
|000052c0| 65 74 20 6d 70 61 74 68 | 20 3d 20 74 68 65 20 70 |et mpath| = the p|
|000052d0| 61 74 68 6e 61 6d 65 20 | 26 20 77 6f 72 6c 64 20 |athname |& world |
|000052e0| 26 20 22 3a 22 0d 20 20 | 70 75 74 20 5b 5d 20 69 |& ":".  |put [] i|
|000052f0| 6e 74 6f 20 66 69 6c 65 | 4c 69 73 74 0d 20 20 0d |nto file|List.  .|
|00005300| 20 20 73 65 74 20 6e 75 | 6d 20 3d 20 74 68 65 20 |  set nu|m = the |
|00005310| 6e 75 6d 62 65 72 20 6f | 66 20 6c 69 6e 65 73 20 |number o|f lines |
|00005320| 6f 66 20 66 69 65 6c 64 | 20 22 66 69 6c 65 6e 61 |of field| "filena|
|00005330| 6d 65 73 22 0d 20 20 72 | 65 70 65 61 74 20 77 69 |mes".  r|epeat wi|
|00005340| 74 68 20 69 20 3d 20 31 | 20 74 6f 20 6e 75 6d 0d |th i = 1| to num.|
|00005350| 20 20 20 20 73 65 74 20 | 6e 20 3d 20 6c 69 6e 65 |    set |n = line|
|00005360| 20 69 20 6f 66 20 66 69 | 65 6c 64 20 22 66 69 6c | i of fi|eld "fil|
|00005370| 65 6e 61 6d 65 73 22 0d | 20 20 20 20 69 66 20 6e |enames".|    if n|
|00005380| 6f 74 65 6d 70 74 79 28 | 6e 29 20 74 68 65 6e 0d |otempty(|n) then.|
|00005390| 20 20 20 20 20 20 61 64 | 64 28 66 69 6c 65 6c 69 |      ad|d(fileli|
|000053a0| 73 74 2c 6e 29 0d 20 20 | 20 20 65 6e 64 20 69 66 |st,n).  |  end if|
|000053b0| 0d 20 20 65 6e 64 20 72 | 65 70 65 61 74 0d 20 20 |.  end r|epeat.  |
|000053c0| 73 65 74 20 6e 75 6d 20 | 3d 20 74 68 65 20 6e 75 |set num |= the nu|
|000053d0| 6d 62 65 72 20 6f 66 20 | 6c 69 6e 65 73 20 6f 66 |mber of |lines of|
|000053e0| 20 66 69 65 6c 64 20 22 | 66 69 6c 65 6e 61 6d 65 | field "|filename|
|000053f0| 73 32 22 0d 20 20 72 65 | 70 65 61 74 20 77 69 74 |s2".  re|peat wit|
|00005400| 68 20 69 20 3d 20 31 20 | 74 6f 20 6e 75 6d 0d 20 |h i = 1 |to num. |
|00005410| 20 20 20 73 65 74 20 6e | 20 3d 20 6c 69 6e 65 20 |   set n| = line |
|00005420| 69 20 6f 66 20 66 69 65 | 6c 64 20 22 66 69 6c 65 |i of fie|ld "file|
|00005430| 6e 61 6d 65 73 32 22 0d | 20 20 20 20 69 66 20 6e |names2".|    if n|
|00005440| 6f 74 65 6d 70 74 79 28 | 6e 29 20 74 68 65 6e 0d |otempty(|n) then.|
|00005450| 20 20 20 20 20 20 61 64 | 64 28 66 69 6c 65 6c 69 |      ad|d(fileli|
|00005460| 73 74 2c 6e 29 0d 20 20 | 20 20 65 6e 64 20 69 66 |st,n).  |  end if|
|00005470| 0d 20 20 65 6e 64 20 72 | 65 70 65 61 74 0d 20 20 |.  end r|epeat.  |
|00005480| 0d 20 20 2d 2d 20 20 72 | 65 70 65 61 74 20 77 69 |.  --  r|epeat wi|
|00005490| 74 68 20 69 20 3d 20 31 | 20 74 6f 20 74 68 65 20 |th i = 1| to the |
|000054a0| 6d 61 78 49 6e 74 65 67 | 65 72 20 20 20 20 0d 20 |maxInteg|er    . |
|000054b0| 20 2d 2d 20 20 20 20 70 | 75 74 20 67 65 74 4e 74 | --    p|ut getNt|
|000054c0| 68 46 69 6c 65 4e 61 6d | 65 49 6e 46 6f 6c 64 65 |hFileNam|eInFolde|
|000054d0| 72 28 6d 70 61 74 68 2c | 20 69 29 20 69 6e 74 6f |r(mpath,| i) into|
|000054e0| 20 6e 0d 20 20 2d 2d 20 | 20 20 20 69 66 20 6e 20 | n.  -- |   if n |
|000054f0| 3d 20 45 4d 50 54 59 20 | 74 68 65 6e 20 65 78 69 |= EMPTY |then exi|
|00005500| 74 20 72 65 70 65 61 74 | 0d 20 20 2d 2d 20 20 20 |t repeat|.  --   |
|00005510| 20 73 65 74 20 6e 75 6d | 20 3d 20 74 68 65 20 6e | set num| = the n|
|00005520| 75 6d 62 65 72 20 6f 66 | 20 63 68 61 72 73 20 6f |umber of| chars o|
|00005530| 66 20 6e 0d 20 20 2d 2d | 20 20 20 20 69 66 20 63 |f n.  --|    if c|
|00005540| 68 61 72 20 28 6e 75 6d | 2d 33 29 20 74 6f 20 6e |har (num|-3) to n|
|00005550| 75 6d 20 6f 66 20 6e 20 | 3d 20 22 2e 73 63 72 22 |um of n |= ".scr"|
|00005560| 20 74 68 65 6e 0d 20 20 | 2d 2d 20 20 20 20 20 20 | then.  |--      |
|00005570| 61 70 70 65 6e 64 28 66 | 69 6c 65 4c 69 73 74 2c |append(f|ileList,|
|00005580| 20 6e 29 0d 20 20 2d 2d | 20 20 20 20 65 6e 64 20 | n).  --|    end |
|00005590| 69 66 0d 20 20 2d 2d 20 | 20 65 6e 64 20 72 65 70 |if.  -- | end rep|
|000055a0| 65 61 74 0d 20 20 0d 20 | 20 73 65 74 20 6e 75 6d |eat.  . | set num|
|000055b0| 20 3d 20 63 6f 75 6e 74 | 28 66 69 6c 65 4c 69 73 | = count|(fileLis|
|000055c0| 74 29 0d 20 20 73 65 74 | 20 74 6d 70 65 72 72 6c |t).  set| tmperrl|
|000055d0| 69 73 74 20 3d 20 5b 5d | 0d 20 20 0d 20 20 72 65 |ist = []|.  .  re|
|000055e0| 70 65 61 74 20 77 69 74 | 68 20 69 20 3d 20 73 74 |peat wit|h i = st|
|000055f0| 61 72 74 6e 75 6d 20 74 | 6f 20 6e 75 6d 0d 20 20 |artnum t|o num.  |
|00005600| 20 20 73 65 74 20 66 6e | 61 6d 65 20 3d 20 67 65 |  set fn|ame = ge|
|00005610| 74 41 74 28 66 69 6c 65 | 4c 69 73 74 2c 69 29 0d |tAt(file|List,i).|
|00005620| 20 20 20 20 70 75 74 20 | 22 62 61 74 63 68 20 70 |    put |"batch p|
|00005630| 61 72 73 69 6e 67 20 22 | 20 26 26 20 66 6e 61 6d |arsing "| && fnam|
|00005640| 65 0d 20 20 20 20 73 65 | 74 20 67 4d 61 6b 65 72 |e.    se|t gMaker|
|00005650| 6e 75 6d 20 3d 20 6e 61 | 6d 65 74 6f 6e 75 6d 28 |num = na|metonum(|
|00005660| 66 6e 61 6d 65 29 0d 20 | 20 20 20 73 65 74 20 67 |fname). |   set g|
|00005670| 4d 61 6b 65 72 4e 61 6d | 65 20 3d 20 66 6e 61 6d |MakerNam|e = fnam|
|00005680| 65 0d 20 20 20 20 73 65 | 74 20 65 72 72 20 3d 20 |e.    se|t err = |
|00005690| 50 61 72 73 65 46 69 6c | 65 28 66 6e 61 6d 65 26 |ParseFil|e(fname&|
|000056a0| 22 2e 73 63 72 22 29 20 | 20 0d 20 20 20 20 0d 20 |".scr") | .    . |
|000056b0| 20 20 20 69 66 20 65 72 | 72 20 3d 20 2d 31 20 74 |   if er|r = -1 t|
|000056c0| 68 65 6e 20 20 0d 20 20 | 20 20 20 20 61 64 64 28 |hen  .  |    add(|
|000056d0| 74 6d 70 65 72 72 6c 69 | 73 74 2c 20 66 6e 61 6d |tmperrli|st, fnam|
|000056e0| 65 29 20 20 0d 20 20 20 | 20 65 6e 64 20 69 66 0d |e)  .   | end if.|
|000056f0| 20 20 20 20 0d 20 20 20 | 20 73 65 74 20 74 68 65 |    .   | set the|
|00005700| 20 69 74 65 6d 64 65 6c | 69 6d 69 74 65 72 20 3d | itemdel|imiter =|
|00005710| 20 22 2e 22 0d 20 20 20 | 20 73 65 74 20 66 6e 61 | ".".   | set fna|
|00005720| 6d 65 20 3d 20 69 74 65 | 6d 20 31 20 6f 66 20 66 |me = ite|m 1 of f|
|00005730| 6e 61 6d 65 0d 20 20 20 | 20 73 65 74 20 74 68 65 |name.   | set the|
|00005740| 20 69 74 65 6d 64 65 6c | 69 6d 69 74 65 72 20 3d | itemdel|imiter =|
|00005750| 20 22 2c 22 0d 20 20 20 | 20 0d 20 20 20 20 73 65 | ",".   | .    se|
|00005760| 74 20 65 72 72 20 3d 20 | 6d 61 6b 65 49 6e 64 65 |t err = |makeInde|
|00005770| 78 28 66 6e 61 6d 65 26 | 22 2e 54 58 54 22 29 20 |x(fname&|".TXT") |
|00005780| 0d 20 20 20 20 69 66 20 | 65 72 72 20 3d 20 2d 31 |.    if |err = -1|
|00005790| 20 74 68 65 6e 20 20 0d | 20 20 20 20 20 20 61 64 | then  .|      ad|
|000057a0| 64 28 74 6d 70 65 72 72 | 6c 69 73 74 2c 20 66 6e |d(tmperr|list, fn|
|000057b0| 61 6d 65 29 20 20 0d 20 | 20 20 20 65 6e 64 20 69 |ame)  . |   end i|
|000057c0| 66 0d 20 20 65 6e 64 20 | 72 65 70 65 61 74 0d 20 |f.  end |repeat. |
|000057d0| 20 0d 20 20 73 65 74 20 | 6e 75 6d 20 3d 20 63 6f | .  set |num = co|
|000057e0| 75 6e 74 28 74 6d 70 65 | 72 72 6c 69 73 74 29 0d |unt(tmpe|rrlist).|
|000057f0| 20 20 70 75 74 20 22 45 | 72 72 6f 72 73 20 69 6e |  put "E|rrors in|
|00005800| 20 22 20 26 26 20 6e 75 | 6d 20 26 26 20 22 73 63 | " && nu|m && "sc|
|00005810| 72 69 70 74 20 66 69 6c | 65 73 3a 22 0d 20 20 0d |ript fil|es:".  .|
|00005820| 20 20 73 65 74 20 74 6d | 70 6e 75 6d 20 3d 20 28 |  set tm|pnum = (|
|00005830| 74 68 65 20 6e 75 6d 62 | 65 72 20 6f 66 20 6c 69 |the numb|er of li|
|00005840| 6e 65 73 20 6f 66 20 66 | 69 65 6c 64 20 22 42 61 |nes of f|ield "Ba|
|00005850| 74 63 68 45 72 72 6f 72 | 73 22 29 20 2b 20 31 0d |tchError|s") + 1.|
|00005860| 20 20 70 75 74 20 22 45 | 72 72 6f 72 73 20 69 6e |  put "E|rrors in|
|00005870| 20 22 20 26 26 20 6e 75 | 6d 20 26 26 20 22 73 63 | " && nu|m && "sc|
|00005880| 72 69 70 74 20 66 69 6c | 65 73 3a 22 20 69 6e 74 |ript fil|es:" int|
|00005890| 6f 20 6c 69 6e 65 20 74 | 6d 70 6e 75 6d 20 6f 66 |o line t|mpnum of|
|000058a0| 20 66 69 65 6c 64 20 22 | 42 61 74 63 68 45 72 72 | field "|BatchErr|
|000058b0| 6f 72 73 22 0d 20 20 0d | 20 20 72 65 70 65 61 74 |ors".  .|  repeat|
|000058c0| 20 77 69 74 68 20 69 20 | 3d 20 31 20 74 6f 20 6e | with i |= 1 to n|
|000058d0| 75 6d 0d 20 20 20 20 70 | 75 74 20 69 20 26 20 22 |um.    p|ut i & "|
|000058e0| 3a 22 26 26 20 67 65 74 | 61 74 28 74 6d 70 65 72 |:"&& get|at(tmper|
|000058f0| 72 6c 69 73 74 2c 69 29 | 0d 20 20 20 20 73 65 74 |rlist,i)|.    set|
|00005900| 20 74 6d 70 6e 75 6d 20 | 3d 20 28 74 68 65 20 6e | tmpnum |= (the n|
|00005910| 75 6d 62 65 72 20 6f 66 | 20 6c 69 6e 65 73 20 6f |umber of| lines o|
|00005920| 66 20 66 69 65 6c 64 20 | 22 42 61 74 63 68 45 72 |f field |"BatchEr|
|00005930| 72 6f 72 73 22 29 20 2b | 20 31 0d 20 20 20 20 70 |rors") +| 1.    p|
|00005940| 75 74 20 69 20 26 20 22 | 3a 22 26 26 20 67 65 74 |ut i & "|:"&& get|
|00005950| 61 74 28 74 6d 70 65 72 | 72 6c 69 73 74 2c 69 29 |at(tmper|rlist,i)|
|00005960| 20 69 6e 74 6f 20 6c 69 | 6e 65 20 74 6d 70 6e 75 | into li|ne tmpnu|
|00005970| 6d 20 6f 66 20 66 69 65 | 6c 64 20 22 42 61 74 63 |m of fie|ld "Batc|
|00005980| 68 45 72 72 6f 72 73 22 | 0d 20 20 65 6e 64 20 72 |hErrors"|.  end r|
|00005990| 65 70 65 61 74 0d 65 6e | 64 0d 0d 2d 2d 2d 2d 2d |epeat.en|d..-----|
|000059a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000059b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000059c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000059d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000059e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 0d 6f 6e 20 50 |--------|---.on P|
|000059f0| 61 72 73 65 46 69 6c 65 | 20 6e 61 6d 65 0d 20 20 |arseFile| name.  |
|00005a00| 67 6c 6f 62 61 6c 20 66 | 69 6c 65 4f 62 6a 2c 20 |global f|ileObj, |
|00005a10| 74 78 74 2c 20 6d 70 61 | 74 68 0d 20 20 0d 20 20 |txt, mpa|th.  .  |
|00005a20| 2d 2d 20 74 68 65 20 73 | 63 72 69 70 74 20 66 69 |-- the s|cript fi|
|00005a30| 6c 65 73 20 61 72 65 20 | 65 69 74 68 65 72 20 6f |les are |either o|
|00005a40| 66 20 74 79 70 65 20 54 | 45 58 54 20 6f 72 20 57 |f type T|EXT or W|
|00005a50| 36 42 4e 20 28 49 20 68 | 61 76 65 20 6e 6f 20 69 |6BN (I h|ave no i|
|00005a60| 64 65 61 20 77 68 65 72 | 65 20 74 68 69 73 20 63 |dea wher|e this c|
|00005a70| 61 6d 65 20 66 72 6f 6d | 29 0d 20 20 2d 2d 20 73 |ame from|).  -- s|
|00005a80| 65 74 20 66 69 6c 65 4f | 62 6a 20 3d 20 66 69 6c |et fileO|bj = fil|
|00005a90| 65 69 6f 28 6d 4e 65 77 | 2c 22 3f 72 65 61 64 22 |eio(mNew|,"?read"|
|00005aa0| 2c 22 54 45 58 54 22 29 | 0d 20 20 2d 2d 20 69 66 |,"TEXT")|.  -- if|
|00005ab0| 20 6e 6f 74 20 6f 62 6a | 65 63 74 50 28 66 69 6c | not obj|ectP(fil|
|00005ac0| 65 4f 62 6a 29 20 74 68 | 65 6e 20 73 65 74 20 66 |eObj) th|en set f|
|00005ad0| 69 6c 65 4f 62 6a 20 3d | 20 66 69 6c 65 69 6f 28 |ileObj =| fileio(|
|00005ae0| 6d 4e 65 77 2c 22 3f 72 | 65 61 64 22 2c 22 57 36 |mNew,"?r|ead","W6|
|00005af0| 42 4e 22 29 0d 20 20 0d | 20 20 0d 20 20 69 66 20 |BN").  .|  .  if |
|00005b00| 74 68 65 20 70 61 72 61 | 6d 63 6f 75 6e 74 20 3d |the para|mcount =|
|00005b10| 20 30 20 74 68 65 6e 0d | 20 20 20 20 73 65 74 20 | 0 then.|    set |
|00005b20| 66 69 6c 65 4f 62 6a 20 | 3d 20 66 69 6c 65 69 6f |fileObj |= fileio|
|00005b30| 28 6d 4e 65 77 2c 22 3f | 72 65 61 64 22 2c 22 54 |(mNew,"?|read","T|
|00005b40| 45 58 54 22 29 0d 20 20 | 65 6c 73 65 0d 20 20 20 |EXT").  |else.   |
|00005b50| 20 73 65 74 20 66 69 6c | 65 4f 62 6a 20 3d 20 66 | set fil|eObj = f|
|00005b60| 69 6c 65 69 6f 28 6d 4e | 65 77 2c 22 72 65 61 64 |ileio(mN|ew,"read|
|00005b70| 22 2c 6d 50 61 74 68 20 | 26 20 6e 61 6d 65 29 0d |",mPath |& name).|
|00005b80| 20 20 65 6e 64 20 69 66 | 0d 20 20 0d 20 20 69 66 |  end if|.  .  if|
|00005b90| 20 6e 6f 74 20 6f 62 6a | 65 63 74 50 28 66 69 6c | not obj|ectP(fil|
|00005ba0| 65 4f 62 6a 29 20 74 68 | 65 6e 20 20 20 0d 20 20 |eObj) th|en   .  |
|00005bb0| 20 20 61 6c 65 72 74 20 | 22 65 72 72 6f 72 20 6f |  alert |"error o|
|00005bc0| 70 65 6e 69 6e 67 20 66 | 69 6c 65 22 20 26 26 20 |pening f|ile" && |
|00005bd0| 6e 61 6d 65 20 0d 20 20 | 20 20 65 78 69 74 0d 20 |name .  |  exit. |
|00005be0| 20 65 6c 73 65 20 20 20 | 20 0d 20 20 20 20 73 65 | else   | .    se|
|00005bf0| 74 20 74 78 74 20 3d 20 | 66 69 6c 65 4f 62 6a 28 |t txt = |fileObj(|
|00005c00| 6d 52 65 61 64 46 69 6c | 65 29 0d 20 20 20 20 66 |mReadFil|e).    f|
|00005c10| 69 6c 65 4f 62 6a 28 6d | 64 69 73 70 6f 73 65 29 |ileObj(m|dispose)|
|00005c20| 0d 20 20 20 20 73 65 74 | 20 65 72 72 20 3d 20 50 |.    set| err = P|
|00005c30| 61 72 73 65 28 29 0d 20 | 20 20 20 69 66 20 65 72 |arse(). |   if er|
|00005c40| 72 20 3d 20 2d 31 20 74 | 68 65 6e 20 20 0d 20 20 |r = -1 t|hen  .  |
|00005c50| 20 20 20 20 72 65 74 75 | 72 6e 20 2d 31 0d 20 20 |    retu|rn -1.  |
|00005c60| 20 20 20 20 65 78 69 74 | 0d 20 20 20 20 65 6e 64 |    exit|.    end|
|00005c70| 20 69 66 0d 20 20 65 6e | 64 20 69 66 0d 20 20 0d | if.  en|d if.  .|
|00005c80| 20 20 70 75 74 20 22 73 | 61 76 69 6e 67 2e 2e 2e |  put "s|aving...|
|00005c90| 22 0d 20 20 0d 20 20 53 | 61 76 65 4e 65 77 50 61 |".  .  S|aveNewPa|
|00005ca0| 72 73 65 0d 20 20 0d 20 | 20 72 65 74 75 72 6e 20 |rse.  . | return |
|00005cb0| 30 0d 20 20 0d 65 6e 64 | 0d 2d 2d 2d 2d 2d 2d 2d |0.  .end|.-------|
|00005cc0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005cd0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005ce0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005cf0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005d00| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 0d 6f 6e 20 50 61 72 |--------|-.on Par|
|00005d10| 73 65 0d 20 20 67 6c 6f | 62 61 6c 20 74 78 74 2c |se.  glo|bal txt,|
|00005d20| 20 67 43 68 61 70 74 65 | 72 73 2c 20 67 41 72 74 | gChapte|rs, gArt|
|00005d30| 69 63 6c 65 73 2c 20 67 | 43 61 70 74 69 6f 6e 73 |icles, g|Captions|
|00005d40| 2c 20 67 54 69 74 6c 65 | 73 2c 20 67 44 61 74 65 |, gTitle|s, gDate|
|00005d50| 73 2c 20 67 4e 61 6d 65 | 2c 20 67 54 6f 74 61 6c |s, gName|, gTotal|
|00005d60| 43 68 61 70 74 65 72 73 | 0d 20 20 67 6c 6f 62 61 |Chapters|.  globa|
|00005d70| 6c 20 67 4e 75 67 67 65 | 74 73 0d 20 20 0d 20 20 |l gNugge|ts.  .  |
|00005d80| 2d 2d 20 67 65 74 20 6e | 61 6d 65 0d 20 20 2d 2d |-- get n|ame.  --|
|00005d90| 20 64 61 74 65 0d 20 20 | 2d 2d 20 6e 61 74 69 6f | date.  |-- natio|
|00005da0| 6e 61 6c 69 74 79 0d 20 | 20 2d 2d 20 73 74 72 61 |nality. | -- stra|
|00005db0| 70 6c 69 6e 65 0d 20 20 | 2d 2d 20 70 61 72 74 77 |pline.  |-- partw|
|00005dc0| 6f 72 6b 20 66 69 6c 65 | 6e 61 6d 65 0d 20 20 0d |ork file|name.  .|
|00005dd0| 20 20 2d 2d 20 67 65 74 | 20 63 68 61 70 74 65 72 |  -- get| chapter|
|00005de0| 20 6e 61 6d 65 73 0d 20 | 20 2d 2d 20 67 65 74 20 | names. | -- get |
|00005df0| 61 72 74 69 63 6c 65 73 | 3a 20 70 69 63 73 2c 20 |articles|: pics, |
|00005e00| 74 65 78 74 2c 20 71 74 | 27 73 20 65 74 63 2e 0d |text, qt|'s etc..|
|00005e10| 20 20 2d 2d 20 67 65 74 | 20 63 61 70 74 69 6f 6e |  -- get| caption|
|00005e20| 73 0d 20 20 0d 20 20 2d | 2d 20 74 68 65 20 70 69 |s.  .  -|- the pi|
|00005e30| 63 74 27 73 20 77 69 6c | 6c 20 61 6c 6c 20 62 65 |ct's wil|l all be|
|00005e40| 20 70 75 74 20 69 6e 74 | 6f 20 61 20 64 69 72 65 | put int|o a dire|
|00005e50| 63 74 6f 72 20 6d 6f 76 | 69 65 2c 20 73 6f 20 61 |ctor mov|ie, so a|
|00005e60| 6c 6c 20 69 20 6e 65 65 | 64 20 74 6f 20 6b 6e 6f |ll i nee|d to kno|
|00005e70| 77 20 0d 20 20 2d 2d 20 | 69 73 20 77 68 69 63 68 |w .  -- |is which|
|00005e80| 20 61 72 65 20 67 6f 69 | 6e 67 20 74 6f 20 62 65 | are goi|ng to be|
|00005e90| 20 70 69 63 74 27 73 20 | 61 6e 64 20 77 68 69 63 | pict's |and whic|
|00005ea0| 68 20 6e 6f 74 2e 0d 20 | 20 0d 20 20 73 65 74 20 |h not.. | .  set |
|00005eb0| 64 65 62 75 67 20 3d 20 | 30 20 20 20 2d 2d 20 73 |debug = |0   -- s|
|00005ec0| 65 74 20 74 68 69 73 20 | 74 6f 20 74 72 75 65 20 |et this |to true |
|00005ed0| 74 6f 20 67 65 74 20 61 | 20 70 72 69 6e 74 6f 75 |to get a| printou|
|00005ee0| 74 20 6f 66 20 74 68 65 | 20 70 61 72 73 65 64 20 |t of the| parsed |
|00005ef0| 74 65 78 74 0d 20 20 0d | 20 20 69 66 20 64 65 62 |text.  .|  if deb|
|00005f00| 75 67 20 74 68 65 6e 20 | 73 65 74 20 74 68 65 20 |ug then |set the |
|00005f10| 74 65 78 74 20 6f 66 20 | 66 69 65 6c 64 20 22 70 |text of |field "p|
|00005f20| 61 72 73 65 64 22 20 3d | 20 22 22 0d 20 20 73 65 |arsed" =| "".  se|
|00005f30| 74 20 67 43 68 61 70 74 | 65 72 73 20 3d 20 5b 5d |t gChapt|ers = []|
|00005f40| 0d 20 20 73 65 74 20 67 | 41 72 74 69 63 6c 65 73 |.  set g|Articles|
|00005f50| 20 3d 20 5b 5d 0d 20 20 | 73 65 74 20 74 6d 70 6c | = [].  |set tmpl|
|00005f60| 69 73 74 20 3d 20 5b 5d | 0d 20 20 73 65 74 20 67 |ist = []|.  set g|
|00005f70| 43 61 70 74 69 6f 6e 73 | 20 3d 20 22 22 0d 20 20 |Captions| = "".  |
|00005f80| 73 65 74 20 67 54 69 74 | 6c 65 73 20 3d 20 22 22 |set gTit|les = ""|
|00005f90| 0d 20 20 73 65 74 20 74 | 6d 70 74 69 74 6c 65 73 |.  set t|mptitles|
|00005fa0| 20 3d 20 22 22 0d 20 20 | 73 65 74 20 74 6d 70 63 | = "".  |set tmpc|
|00005fb0| 61 70 74 69 6f 6e 73 20 | 3d 20 22 22 0d 20 20 73 |aptions |= "".  s|
|00005fc0| 65 74 20 67 44 61 74 65 | 73 20 3d 20 5b 5d 0d 20 |et gDate|s = []. |
|00005fd0| 20 73 65 74 20 74 6d 70 | 64 61 74 65 73 20 3d 20 | set tmp|dates = |
|00005fe0| 5b 5d 0d 20 20 73 65 74 | 20 67 4e 75 67 67 65 74 |[].  set| gNugget|
|00005ff0| 73 20 3d 20 22 22 0d 20 | 20 73 65 74 20 63 61 70 |s = "". | set cap|
|00006000| 74 69 6f 6e 54 65 78 74 | 20 3d 20 22 22 0d 20 20 |tionText| = "".  |
|00006010| 0d 20 20 73 65 74 20 67 | 4e 61 6d 65 20 3d 20 22 |.  set g|Name = "|
|00006020| 22 0d 20 20 0d 20 20 73 | 65 74 20 6e 75 6d 20 3d |".  .  s|et num =|
|00006030| 20 31 0d 20 20 73 65 74 | 20 74 6f 74 61 6c 6e 75 | 1.  set| totalnu|
|00006040| 6d 20 3d 20 74 68 65 20 | 6e 75 6d 62 65 72 20 6f |m = the |number o|
|00006050| 66 20 6c 69 6e 65 73 20 | 6f 66 20 74 78 74 0d 20 |f lines |of txt. |
|00006060| 20 73 65 74 20 63 68 61 | 70 20 3d 20 30 20 20 20 | set cha|p = 0   |
|00006070| 20 20 20 20 2d 2d 20 77 | 65 20 73 74 61 72 74 20 |    -- w|e start |
|00006080| 6f 66 66 20 62 65 66 6f | 72 65 20 63 68 61 70 74 |off befo|re chapt|
|00006090| 65 72 20 6f 6e 65 20 28 | 74 68 65 20 69 6e 74 72 |er one (|the intr|
|000060a0| 6f 29 0d 20 20 73 65 74 | 20 69 6e 4e 75 67 67 65 |o).  set| inNugge|
|000060b0| 74 73 20 3d 20 30 0d 20 | 20 73 65 74 20 61 72 74 |ts = 0. | set art|
|000060c0| 69 63 6c 65 20 3d 20 30 | 0d 20 20 0d 20 20 2d 2d |icle = 0|.  .  --|
|000060d0| 2d 20 50 41 52 53 45 52 | 20 2d 2d 2d 2d 2d 2d 2d |- PARSER| -------|
|000060e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000060f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 0d 20 |--------|------. |
|00006100| 20 2d 2d 20 67 6f 20 74 | 68 72 6f 75 67 68 20 74 | -- go t|hrough t|
|00006110| 68 65 20 74 65 78 74 20 | 61 6e 64 20 50 61 72 73 |he text |and Pars|
|00006120| 65 20 69 74 0d 20 20 0d | 20 20 72 65 70 65 61 74 |e it.  .|  repeat|
|00006130| 20 77 69 74 68 20 6e 75 | 6d 20 3d 20 31 20 74 6f | with nu|m = 1 to|
|00006140| 20 74 6f 74 61 6c 6e 75 | 6d 0d 20 20 20 20 0d 20 | totalnu|m.    . |
|00006150| 20 20 20 73 65 74 20 6c | 6e 20 3d 20 6c 69 6e 65 |   set l|n = line|
|00006160| 20 6e 75 6d 20 6f 66 20 | 74 78 74 0d 20 20 20 20 | num of |txt.    |
|00006170| 0d 20 20 20 20 69 66 20 | 6e 6f 74 20 6e 6f 74 45 |.    if |not notE|
|00006180| 6d 70 74 79 28 6c 6e 29 | 20 74 68 65 6e 20 6e 65 |mpty(ln)| then ne|
|00006190| 78 74 20 72 65 70 65 61 | 74 20 20 2d 2d 20 73 6b |xt repea|t  -- sk|
|000061a0| 69 70 20 65 6d 70 74 79 | 20 6c 69 6e 65 73 0d 20 |ip empty| lines. |
|000061b0| 20 20 20 0d 20 20 20 20 | 69 66 20 63 68 61 70 20 |   .    |if chap |
|000061c0| 3d 20 30 20 74 68 65 6e | 0d 20 20 20 20 20 20 69 |= 0 then|.      i|
|000061d0| 66 20 63 68 61 72 20 31 | 20 6f 66 20 6c 6e 20 3c |f char 1| of ln <|
|000061e0| 3e 20 22 31 22 20 74 68 | 65 6e 20 0d 20 20 20 20 |> "1" th|en .    |
|000061f0| 20 20 20 20 6e 65 78 74 | 20 72 65 70 65 61 74 0d |    next| repeat.|
|00006200| 20 20 20 20 20 20 65 6c | 73 65 20 0d 20 20 20 20 |      el|se .    |
|00006210| 20 20 20 20 73 65 74 20 | 63 68 61 70 20 3d 20 31 |    set |chap = 1|
|00006220| 0d 20 20 20 20 20 20 65 | 6e 64 20 69 66 0d 20 20 |.      e|nd if.  |
|00006230| 20 20 65 6e 64 20 69 66 | 0d 20 20 20 20 0d 20 20 |  end if|.    .  |
|00006240| 20 20 0d 20 20 20 20 2d | 2d 20 49 4e 54 52 4f 0d |  .    -|- INTRO.|
|00006250| 20 20 20 20 0d 20 20 20 | 20 2d 2d 20 72 65 61 64 |    .   | -- read|
|00006260| 20 74 68 65 20 69 6e 74 | 72 6f 20 69 6e 66 6f 72 | the int|ro infor|
|00006270| 6d 61 74 69 6f 6e 0d 20 | 20 20 20 69 66 20 63 68 |mation. |   if ch|
|00006280| 61 70 20 3d 20 31 20 74 | 68 65 6e 0d 20 20 20 20 |ap = 1 t|hen.    |
|00006290| 20 20 69 66 20 6c 6e 20 | 63 6f 6e 74 61 69 6e 73 |  if ln |contains|
|000062a0| 20 22 4e 61 6d 65 22 20 | 74 68 65 6e 0d 20 20 20 | "Name" |then.   |
|000062b0| 20 20 20 20 20 73 65 74 | 20 6e 75 6d 20 3d 20 6e |     set| num = n|
|000062c0| 75 6d 20 2b 20 31 0d 20 | 20 20 20 20 20 20 20 2d |um + 1. |       -|
|000062d0| 2d 20 67 65 74 20 74 68 | 65 20 6c 61 73 74 20 77 |- get th|e last w|
|000062e0| 6f 72 64 20 6f 6e 20 74 | 68 65 20 6c 69 6e 65 2c |ord on t|he line,|
|000062f0| 20 68 6f 70 65 66 75 6c | 6c 79 20 74 68 69 73 20 | hopeful|ly this |
|00006300| 69 73 20 74 68 65 20 6e | 61 6d 65 0d 20 20 20 20 |is the n|ame.    |
|00006310| 20 20 20 20 73 65 74 20 | 67 4e 61 6d 65 20 3d 20 |    set |gName = |
|00006320| 77 6f 72 64 20 28 74 68 | 65 20 6e 75 6d 62 65 72 |word (th|e number|
|00006330| 20 6f 66 20 77 6f 72 64 | 73 20 6f 66 20 6c 69 6e | of word|s of lin|
|00006340| 65 20 6e 75 6d 20 6f 66 | 20 74 78 74 29 20 6f 66 |e num of| txt) of|
|00006350| 20 6c 69 6e 65 20 6e 75 | 6d 20 6f 66 20 74 78 74 | line nu|m of txt|
|00006360| 0d 20 20 20 20 20 20 65 | 6e 64 20 69 66 20 20 20 |.      e|nd if   |
|00006370| 20 20 0d 20 20 20 20 65 | 6e 64 20 69 66 0d 20 20 |  .    e|nd if.  |
|00006380| 20 20 0d 20 20 20 20 0d | 20 20 20 20 2d 2d 20 4e |  .    .|    -- N|
|00006390| 45 57 20 43 48 41 50 54 | 45 52 0d 20 20 20 20 0d |EW CHAPT|ER.    .|
|000063a0| 20 20 20 20 2d 2d 20 72 | 65 61 64 20 74 68 65 20 |    -- r|ead the |
|000063b0| 63 68 61 70 74 65 72 20 | 69 6e 66 6f 72 6d 61 74 |chapter |informat|
|000063c0| 69 6f 6e 2c 20 77 68 69 | 63 68 20 66 6f 6c 6c 6f |ion, whi|ch follo|
|000063d0| 77 73 20 74 68 65 20 73 | 61 6d 65 20 66 6f 72 6d |ws the s|ame form|
|000063e0| 61 74 20 66 6f 72 20 61 | 6c 6c 20 74 68 65 0d 20 |at for a|ll the. |
|000063f0| 20 20 20 2d 2d 20 63 68 | 61 70 74 65 72 73 2e 20 |   -- ch|apters. |
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.